diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/gothic/blacklettert1/blacklettert1.dtx |
Initial commit
Diffstat (limited to 'fonts/gothic/blacklettert1/blacklettert1.dtx')
-rw-r--r-- | fonts/gothic/blacklettert1/blacklettert1.dtx | 6280 |
1 files changed, 6280 insertions, 0 deletions
diff --git a/fonts/gothic/blacklettert1/blacklettert1.dtx b/fonts/gothic/blacklettert1/blacklettert1.dtx new file mode 100644 index 0000000000..3b75fc3558 --- /dev/null +++ b/fonts/gothic/blacklettert1/blacklettert1.dtx @@ -0,0 +1,6280 @@ +% \iffalse meta-comment +% $Id: blacklettert1.dtx,v 1.3 2002/05/30 18:16:53 torsten Exp torsten $ +% +% blacklettert1.dtx -- Blackletter Typefaces in T1 Encoding +% Copyright 2003 Torsten Bronger <torsten.bronger@gmx.de> +% +% This program may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either version 1.2 +% of this license or (at your option) any later version. +% The latest version of this license is in +% http://www.latex-project.org/lppl.txt +% and version 1.2 or later is part of all distributions of LaTeX +% version 1999/12/01 or later. +% +% \fi +% +% \CheckSum{5465} +% \CharacterTable +% {Upper-case \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 +% Lower-case \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 +% Digits \0\1\2\3\4\5\6\7\8\9 +% Exclamation \! Double quote \" Hash (number) \# +% Dollar \$ Percent \% Ampersand \& +% Acute accent \' Left paren \( Right paren \) +% Asterisk \* Plus \+ Comma \, +% Minus \- Point \. Solidus \/ +% Colon \: Semicolon \; Less than \< +% Equals \= Greater than \> Question mark \? +% Commercial at \@ Left bracket \[ Backslash \\ +% Right bracket \] Circumflex \^ Underscore \_ +% Grave accent \` Left brace \{ Vertical bar \| +% Right brace \} Tilde \~} +% +% +% \def\fileversion{v1.1} +% \def\filedate{2003/02/17} +% +% \title{Blackletter Typefaces in T1 Encoding\thanks{This file +% has version number \fileversion, last +% revised \filedate.}} +% \author{Torsten Bronger\\ +% \url{bronger@physik.rwth-aachen.de}} +% +% \maketitle +% +% \begin{abstract} +% This package |blacklettert1| provides virtual fonts for T1-like variants of the +% blackletter typefaces published in 1990 by Yannis Haralambous, namely yfrak, +% yswab and ygoth. Their original encoding is unspecified. Additionally, this +% package embeds these fonts nicely into \LaTeXe's font selection scheme. The +% structure of this package allows for further blackletter typefaces from other +% sources to be made usable for \LaTeX\ in a similar way, too. +% \end{abstract} +% +% \tableofcontents +% +% \section*{The documentation driver file} +% +% The next bit of code contains the documentation driver file for +% \TeX, i.\,e., the file that will produce the documentation you are +% currently reading. It will be extracted from this file by the +% \texttt{docstrip} program. Since it is the first code in the file +% one can alternatively process this file directly with \LaTeXe{} to +% obtain the documentation. +% +% \begin{macrocode} +%<*driver> +\documentclass{ltxdoc} + +% \end{macrocode} +% If you comment out the next line, you get a \emph{full} description +% of this package. +% \begin{macrocode} +\OnlyDescription + +% \end{macrocode} +% Not clean at all, but it works. +% \begin{macrocode} +\newlabel{codingscheme}{{??}{??}} + +\setcounter{StandardModuleDepth}{1} + +\usepackage{url} +\providecommand*{\url}[1]{\texttt{\mbox{#1}}} + +\usepackage{mathptmx} + +\begin{document} + \DocInput{blacklettert1.dtx} + \PrintChanges + \PrintIndex +\end{document} +%</driver> +% \end{macrocode} +% +% \section{Introduction} +% +% In 1990, Yannis Haralambous published a set of three blackletter typefaces. +% (Very often, though inaccurately, such typefaces are also called ``Gothic'' +% or ``old German'' typefaces.) +% +% These three fonts are yfrak (Fraktur), yswab (Schwabacher) and ygoth +% (Textur), and Haralambous made them freely available. They were created +% using Metafont. Unfortunately, although all three fonts are very nicely +% drawn and well endowed with ligatures and special symbols, they are produced +% in a very awkward encoding, making it very inconvenient to use them. +% Therefore in 1994 Thierry Bouche wrote dcfrak, a Metafont font that by and +% large was a T1 (Cork) encoded re-implementation of Haralambous' yfrak. +% Bouche added blacker accents. +% +% His work has three flaws: It only covers yfrak, it is a new font (virtual +% fonts are prefered if possible) and it doesn't make use of \TeX's boundary +% character feature that was especially designed having blackletter typefaces and +% old Latin scripts in mind. +% +% +% \section{This package} +% +% \dots~provides virtual fonts and a (nearly) T1 encoded Fraktur family that +% can be used very easily with \LaTeX. In fact, if you switch to the font by +% saying +%\begin{verbatim} +%\fontfamily{yfrak}\selectfont +%\end{verbatim} +% (no special package is needed, but T1 must be the current encoding) all you +% still have to do is to break up certain ligatures with \verb|\/| commands. +% You could even use the same \LaTeX\ source text for both Fraktur and, say, +% Times output. +% +% This approach has several advantages: +% \begin{itemize} +% \item Virtual fonts are easy to install and elegantly make use of already +% installed fonts, +% \item you don't have to get adjusted to the quite strange input format +% Haralambous suggested, actually the impact on the source text is (not zero, +% but) relatively small, +% \item makes it possible to return to Latin typefaces without further changes, +% \item makes proper hyphenation in whatever language possible, +% \item makes spell checkers that can cope with \LaTeX\ work also for Fraktur +% texts, +% \item allows for letterspaced version and +% \item embeds yfrak, yswab and ygoth nicely in the font selection scheme of +% \LaTeX. +% \end{itemize} +% +% Additionally, it solves some design flaws of the original fonts: +% \begin{itemize} +% \item ygoth is slightly letterspaced. +% \item The letters i, l and fi of ygoth are now correctly positioned within +% their boxes. +% \item Many too big and too small letter boxes are adjusted. +% \item Missing dieresis accent added to ygoth and yfrak. +% \item Inter-word space is reduced. +% \end{itemize} +% +% I have to admit one disadvantage of this virtual font approach: Some DVI +% viewers still can't handle them properly. In this case, please complain to +% the DVI driver author. At least dvips has no problem. +% +% \medskip The package bases on a modified version of the T1 encoding, but +% only unusual slots got a new contents. This T1 variant can be used for +% other blackletter typefaces, too. See the full documentation of this package for +% further details. +% +% \section{Installation} +% +% You can use the already compiled \mbox{|vf|-,} |tfm|- and |fd|-files. Just +% copy them in directories where \LaTeX\ and your DVI driver can find them. +% (Typically where other files with the same respective extension already +% exist.) +% +% Alternatively you can use the Makefile and give the commands +%\begin{verbatim} +%make +%make install +%\end{verbatim} +% (At least the latter as root.) This will create fresh versions of the +% virtual fonts and install them. Please have a look at the Makefile, whether +% all paths are set as you need them. If you want to compile the fonts, please +% notice that you need special PL files for yfrak, yswab, ygoth and cmu10. +% The problem is that they must have set a certain \texttt{CODINGSCHEME}. See +% page~\pageref{codingscheme} (this page is unknown if you have set +% \mbox{\texttt{\char'134OnlyDescription}}) for further details. +% +% Maybe it's necessary to run a program like te\TeX's |texhash| -- or +% something equivalent of your \TeX\ implementation -- after the installation +% process. +% +% \section{Using the fonts} +% +% \emph{Warning}: The original fonts (|.mf| or |.pfb|) must be available for +% your DVI driver before this package can be used! They are not part of this +% package. +% +% \subsection{Switching to Fraktur} +% +% This package doesn't contain a |sty| file that you can include with a +% |\usepackage| command. If you switch to yfrak in the T1 encoding with +% something like +%\begin{verbatim} +%\fontfamily{yfrak}\selectfont +%\end{verbatim} +% you get Fraktur. The |\emph| version will be a neatly letterspaced Fraktur, +% |\textsl| is Schwabacher. In the preamble you can say +%\begin{verbatim} +%\renewcommand{\emph}[1]{\textsl{#1}} +%\end{verbatim} +% and Schwabacher will be the default |\emph| markup, if you prefer that. +% Bold face is Textur, so that Textur will be used for the headings (standard +% \LaTeX\ behaviour) which is common use. +% +%You can make the Fraktur font selection global for the whole document by +% saying +%\begin{verbatim} +%\renewcommand{\rmdefault}{yfrak} +%\end{verbatim} +% in the preamble. +% +% \subsection{Typographic difficulties} +% +% A very important point is breaking up ligatures with |\/| or -- in German +% texts -- with \verb!"|!. Blackletter typefaces have many of them, but at subword +% boundaries you have to split them up. The German word ``aus\/tragen'' is +% written in the source as ``\verb!aus"|tragen!'', because ``aus'' is a +% prefix. +% +% Blackletter typefaces have two lower case ``s'': A \emph{round} one, the one we +% know, and a \emph{long} one, similar of an ``f''. In German, the latter has +% survived as the left part in the ligature ``\ss''. One must choose the +% correct form for every occurrence. As a rule of thumb, the round form at +% the end of the word, the long form everywhere else. \TeX\ will do that +% automatically. However, sometimes a round ``s'' is necessary within a word, +% at the end of a subword boundary. +% +% From \TeX's point of view, the letter of ``s'' within or at the beginning of +% words is a ligature, too. A typical German case is ``aussetzen'' that must +% be input ``\verb!aus"|setzen!''. Sometimes you will have to input a |\/| as +% in |kafkaes\/k|. But there are also English examples: |news\/letter| -- +% although Knuth insists on the ligature.~\texttt{\mbox{;-)}} +% +% +% +% \section{Remarks} +% +% The author of this package would like to encourage people to use Fraktur, +% for small bits of their texts, for special moods or just for aesthetical +% considerations. Technically speaking, I try to lower the threshold for +% using these typefaces by making the access a lot easier. They are of course +% not for everyday texts. +% +% But it's really a pity that many people think that such blackletter typefaces are +% old use, or connect them with German nationalism, especially the Nazi +% era. The first is not strictly true (at least not for German speaking +% regions), the latter is very unfair. Only few people know that the Nazis +% themselves forbade them in 1941, because they were ``Jewish letters'' -- the +% ban being as silly as the given reason. +% +% One should consider blackletter typefaces another degree of freedom in the font +% space. They are not only to revive old texts; in fact, many font foundries +% produce -- albeit only a few -- new Fraktur variants. +% +% \medskip To non-German authors: Although Fraktur and Schwabacher have been +% used almost entirely for German texts, there is really no reason to limit it +% to that. Their parents and sisters, Gothic, Textura, Rotunda, Bastarda +% etc.\ have been heavily used for Latin, Italian, French and English. +% European and American designers have created beautiful Fraktur alphabets. +% A.~Kapr wrote, ``Schwabacher and Fraktur are just branches of the Latin +% script tree, tended by many nations.'' +% +% +% \section{Related work} +% +% The |fraktur| package by Matthias Muehlich (FixMe:~Link!)\ is another +% approach to bring blackletter typefaces to \LaTeX. The main differences are: +% \begin{itemize} +% \item He provides virtual font solutions for many commercial fonts (but +% not for Haralambous' typefaces). +% \item He uses another encoding (FixMe:~Name?)\ which is quite much different +% from T1. It covers some additional letters and ligatures. +% \end{itemize} +% If you want to have a ready-to-run solution for those typefaces (some of +% which are free for private use), this package will be helpful for you. +% +% \bigskip Walter Schmidt's |yfonts| package provides a more direct access to +% Haralambous' fonts, including the initials font |yinitas|. This is especially +% useful if you want to typeset old texts, with all ligatures and Gutenberg +% feeling. +% +% \StopEventually{} +% +% +% \section{The \texttt{fontinst} input file} +% +% This file (|yutoyt1.tex|) is the driver file for the T1 representation +% of Yannis Haralambous' blackletter typefaces. It it called by +%\begin{verbatim} +%tex yutoyt1 +%\end{verbatim} +% \begin{macrocode} +%<*yutoyt1tex> +\input fontinst.sty + +\def\requiredversion{1.801} +\ifx\fontinstversion\requiredversion\else\errmessage{fontinst 1.801 needed.}\fi + +% \end{macrocode} +% The first step is quite unusual: I have to define some new encodings, +% because Haralambous invented three different encodings for his three fonts, +% and, of course, also incompatible with all other encodings on this planet. +% +% \emph{Warning:}\label{codingscheme} That's the reason why you can't use this +% package with the \emph{original} TFM files. You must use the PL files +% supplied with this package, because the PL files must contain the correct +% name for their encoding. Although that's the only line that's been +% modified, it's crucial. +% \begin{macrocode} +\declareencoding{YH GOTISCH}{ygoth} +\declareencoding{YH SCHWABACHER}{yswab} +\declareencoding{YH FRAKTUR}{yfrak} +% \end{macrocode} +% The same is true for |cmu10.pl|: It has a slightly different encoding +% (it contains a sterling sign instead of a dollar), but it doesn't say so +% in the tfm file header. By the way, the |ot1i| encoding is part of the +% standard \texttt{fontinst} distribution. +% \begin{macrocode} +\declareencoding{TEX ITALIC TEXT}{ot1i} +\installfonts +% \end{macrocode} +% I didn't rename the family name because I don't know of another T1 version +% of yfrak. I think it's not a lie when I claim that it's still yfrak, but +% in another encoding. +% +% I need another hyphen character because otherwise a long ``s'' may become +% round immediately before a hyphen. +% \begin{macrocode} +\installfamily{T1}{yfrak}{\hyphenchar\font=127} + +% \end{macrocode} +% First, the normal version. The tfm file will be called |tfrak.tfm|. +% \begin{macrocode} +\installfont{tfrak}{yfrak,kernoff,yswab scaled 700,setglyph,% + cmr10,cmmi10,cmsy10,% + unsetacc,cmr7 scaled 700,ecrm1000,% + unsetcm,ecrm0700 scaled 700,kernon,% + unsetdia,yfrak,kernoff,unsetste,cmu10,kernon,% + fcleanup,blackletter}{T1frak} + {T1}{yfrak}{m}{n}{} +% \end{macrocode} +% Secondly, the letterspaced version. By and large, it's a copy from above. +% Notice that I annihilate almost all kerning, in fact, only one pair +% survives! The latterspaced version is mapped to the italic variant. This +% should transform legacy document automatically, and it helps to +% ``re-antiqua'' Fraktur texts easily. +% \begin{macrocode} +\installfont{tfrakls}{kernoff,yfrak,yswab scaled 700,setglyph,% + cmr10,cmmi10,cmsy10,% + unsetacc,cmr7 scaled 700,ecrm1000,% + unsetcm,ecrm0700 scaled 700,% + unsetdia,yfrak,unsetste,cmu10,% + fcleanup,kernon,lettersp,kernoff,blackletter}{T1frak} + {T1}{yfrak}{m}{it}{} +% \end{macrocode} +% The |\textsl| version is |tswab|, the T1 variant of |yswab|. It is +% much simpler, largely because it doesn't need smaller accents. +% \begin{macrocode} +\installfont{tswab}{yswab,setglyph,kernoff,cmbx10,cmmib10,cmbsy10,% + unsetcm,ecbx1000,kernon,% + unsetdia,yswab,scleanup,blackletter}{T1frak} + {T1}{yfrak}{m}{sl}{} +% \end{macrocode} +% Very closely related to the |tswab| solution is |tgoth|, which is mapped to +% the bold version of yfrak in the T1 encoding. The only differences are in +% |gcleanup.mtx|. +% \begin{macrocode} +\installfont{tgoth}{ygoth,setglyph,kernoff,cmbx10,cmmib10,cmbsy10,% + unsetcm,ecbx1000,kernon,% + unsetdia,ygoth,gcleanup,blackletter}{T1frak} + {T1}{yfrak}{b}{n}{} +\endinstallfonts + +\bye +%</yutoyt1tex> +% \end{macrocode} +% +% +% \section{The \texttt{yfrak} text encoding vector} +% +% Here I describe the original encoding of the yfrak font by Yannis +% Haralambous. This file is read when |yfrak.pl| is converted into +% |yfrak.mtx| in order to be digested by \texttt{fontinst}. +% +% FixMe: Probably this file could easily be simplified very +% much, especially the metric setting may be superfluous. But I don't know. +% \begin{macrocode} +%<*yfraketx> +\relax + +\documentclass[twocolumn]{article} +\usepackage{fontdoc} + +\title{The \texttt{yfrak} text encoding vector} +\author{Torsten Bronger} +\date{10 April 2002 \\ +Version 1.0} + +\begin{document} +\maketitle + +\section{Introduction} + +This document describes the encoding of yfrak (fraktur). + +\encoding + +\needsfontinstversion{1.801} + + +\comment{\section{Default values}} + +\setcommand\lc#1#2{#2} +\setcommand\uc#1#2{#1} +\setcommand\lclig#1#2{#2} +\setcommand\uclig#1#2{#1} +\setcommand\digit#1{#1} +\setcommand\tty{n} +\setcommand\currency{dollar} + +\setstr{codingscheme}{UNSPECIFIED} + +\setint{italicslant}{0} + +\ifisglyph{x}\then + \setint{xheight}{\height{x}} +\else + \setint{xheight}{500} +\fi + +\ifisglyph{space}\then + \setint{interword}{\width{space}} +\else\ifisglyph{i}\then + \setint{interword}{\width{i}} +\else + \setint{interword}{333} +\fi\fi + + +\comment{\section{Default font dimensions}} + +\setint{fontdimen(1)}{\int{italicslant}} % italic slant +\setint{fontdimen(2)}{\int{interword}} % interword space +\ifisint{monowidth}\then + \setint{fontdimen(3)}{0} % interword stretch + \setint{fontdimen(4)}{0} % interword shrink +\else + \setint{fontdimen(3)}{\scale{\int{interword}}{600}}% interword stretch + \setint{fontdimen(4)}{\scale{\int{interword}}{240}}% interword shrink +\fi +\setint{fontdimen(5)}{\int{xheight}} % x-height +\setint{fontdimen(6)}{1000} % quad +\ifisint{monowidth}\then + \setint{fontdimen(7)}{\int{interword}} % extra space after . +\else + \setint{fontdimen(7)}{\scale{\int{interword}}{240}}% extra space after . +\fi + +\setint{boundarychar}{32} + +\comment{\section{The encoding}} + +\nextslot{"10} + +\setslot{dotlessi} + \comment{A dotless i like `\i'} +\endsetslot + +\setslot{dotlessj} + \comment{A dotless j like `\j'} +\endsetslot + +\setslot{grave} + \comment{The grave accent `\`a'.} +\endsetslot + +\setslot{acute} + \comment{The acute accent `\'a'.} +\endsetslot + +\setslot{caron} + \comment{The caron or h\'a\v cek accent `\v a'.} +\endsetslot + +\setslot{breve} + \comment{The breve accent `\u a'.} +\endsetslot + +\setslot{macron} + \comment{The macron accent `\=a'.} +\endsetslot + +\setslot{ringfitted} + \comment{The ring accent `\aa', fitted to be the same width as an + upper case `A'.} +\endsetslot + +\setslot{cedilla} + \comment{The cedilla accent `\c a'.} +\endsetslot + +\skipslots{1} + +\setslot{\lc{SS}{germandbls}} + \comment{The letter `\ss'.} +\endsetslot + +\nextslot{"21} + +\setslot{exclam} + \comment{The exclamation mark `!'.} +\endsetslot + +\setslot{quotedblleft} + \comment{The English opening quote mark `\,\textquotedblleft\,'.} +\endsetslot + +\setslot{numbersign} + \comment{The hash sign `\#'.} +\endsetslot + +\setslot{varJ} + \comment{Variant of the letter `{J}'.} +\endsetslot + +\setslot{percent} + \comment{The percent sign `\%'.} +\endsetslot + +\setslot{ampersand} + \comment{The ampersand sign `\&'.} +\endsetslot + +\setslot{quoteright} + \ligature{LIG}{quoteright}{quotedblright} + \comment{The English closing quotation mark `\,'\,'.} +\endsetslot + +\setslot{parenleft} + \comment{The opening parenthesis `('.} +\endsetslot + +\setslot{parenright} + \comment{The closing parenthesis `)'.} +\endsetslot + +\setslot{asterisk} + \comment{The raised asterisk `*'.} +\endsetslot + +\setslot{plus} + \comment{The addition sign `+'.} +\endsetslot + +\setslot{comma} + \comment{The comma `,'.} +\endsetslot + +\setslot{hyphen} + \ligature{LIG}{hyphen}{rangedash} + \comment{The hyphen `-'.} +\endsetslot + +\setslot{period} + \comment{The full point `.'.} +\endsetslot + +\setslot{slash} + \comment{The forward oblique `/'.} +\endsetslot + +\setslot{\digit{zero}} + \comment{The number zero `0'. This (and all the other numerals) may be + old style or ranging digits.} +\endsetslot + +\setslot{\digit{one}} + \comment{The number one `1'.} +\endsetslot + +\setslot{\digit{two}} + \comment{The number two `2'.} +\endsetslot + +\setslot{\digit{three}} + \comment{The number three `3'.} +\endsetslot + +\setslot{\digit{four}} + \comment{The number four `4'.} +\endsetslot + +\setslot{\digit{five}} + \comment{The number five `5'.} +\endsetslot + +\setslot{\digit{six}} + \comment{The number six `6'.} +\endsetslot + +\setslot{\digit{seven}} + \comment{The number seven `7'.} +\endsetslot + +\setslot{\digit{eight}} + \comment{The number eight `8'.} +\endsetslot + +\setslot{\digit{nine}} + \comment{The number nine `9'.} +\endsetslot + +\setslot{colon} + \comment{The colon punctuation mark `:'.} +\endsetslot + +\setslot{semicolon} + \comment{The semi-colon punctuation mark `;'.} +\endsetslot + +\setslot{section} + \comment{The section sign `{\S}'.} +\endsetslot + +\setslot{equal} + \comment{The equals sign `='.} +\endsetslot + +\skipslots{1} + +\setslot{question} + \comment{The question mark `?'.} +\endsetslot + +\skipslots{1} + +\setslot{\uc{A}{a}} + \comment{The letter `{A}'.} +\endsetslot + +\setslot{\uc{B}{b}} + \comment{The letter `{B}'.} +\endsetslot + +\setslot{\uc{C}{c}} + \comment{The letter `{C}'.} +\endsetslot + +\setslot{\uc{D}{d}} + \comment{The letter `{D}'.} +\endsetslot + +\setslot{\uc{E}{e}} + \comment{The letter `{E}'.} +\endsetslot + +\setslot{\uc{F}{f}} + \comment{The letter `{F}'.} +\endsetslot + +\setslot{\uc{G}{g}} + \comment{The letter `{G}'.} +\endsetslot + +\setslot{\uc{H}{h}} + \comment{The letter `{H}'.} +\endsetslot + +\setslot{\uc{I}{i}} + \comment{The letter `{I}'.} +\endsetslot + +\setslot{\uc{J}{j}} + \comment{The letter `{J}'.} +\endsetslot + +\setslot{\uc{K}{k}} + \comment{The letter `{K}'.} +\endsetslot + +\setslot{\uc{L}{l}} + \comment{The letter `{L}'.} +\endsetslot + +\setslot{\uc{M}{m}} + \comment{The letter `{M}'.} +\endsetslot + +\setslot{\uc{N}{n}} + \comment{The letter `{N}'.} +\endsetslot + +\setslot{\uc{O}{o}} + \comment{The letter `{O}'.} +\endsetslot + +\setslot{\uc{P}{p}} + \comment{The letter `{P}'.} +\endsetslot + +\setslot{\uc{Q}{q}} + \comment{The letter `{Q}'.} +\endsetslot + +\setslot{\uc{R}{r}} + \comment{The letter `{R}'.} +\endsetslot + +\setslot{\uc{S}{s}} + \comment{The letter `{S}'.} +\endsetslot + +\setslot{\uc{T}{t}} + \comment{The letter `{T}'.} +\endsetslot + +\setslot{\uc{U}{u}} + \comment{The letter `{U}'.} +\endsetslot + +\setslot{\uc{V}{v}} + \comment{The letter `{V}'.} +\endsetslot + +\setslot{\uc{W}{w}} + \comment{The letter `{W}'.} +\endsetslot + +\setslot{\uc{X}{x}} + \comment{The letter `{X}'.} +\endsetslot + +\setslot{\uc{Y}{y}} + \comment{The letter `{Y}'.} +\endsetslot + +\setslot{\uc{Z}{z}} + \comment{The letter `{Z}'.} +\endsetslot + +\setslot{bracketleft} + \comment{The opening square bracket `['.} +\endsetslot + +\setslot{quotedblbase} + \comment{A German double quote mark `,\kern-0.1em,' similar to two commas, + but with tighter letterspacing and different sidebearings.} +\endsetslot + +\setslot{bracketright} + \comment{The closing square bracket `]'.} +\endsetslot + +\setslot{circumflex} + \comment{The circumflex accent `\^ a'.} +\endsetslot + +\setslot{dotaccent} + \comment{The dot accent `\.a'.} +\endsetslot + +\setslot{quoteleft} + \ligature{LIG}{quoteleft}{quotedblleft} + \comment{The English opening single quotation mark `\,`\,'.} +\endsetslot + +\setslot{\lc{A}{a}} + \comment{The letter `{a}'.} +\endsetslot + +\setslot{\lc{B}{b}} + \comment{The letter `{b}'.} +\endsetslot + +\setslot{\lc{C}{c}} + \comment{The letter `{c}'.} +\endsetslot + +\setslot{\lc{D}{d}} + \comment{The letter `{d}'.} +\endsetslot + +\setslot{\lc{E}{e}} + \comment{The letter `{e}'.} +\endsetslot + +\setslot{\lc{F}{f}} + \ligature{LIG}{\lc{I}{i}}{\lclig{FI}{fi}} + \ligature{LIG}{\lc{F}{f}}{\lclig{FF}{ff}} + \ligature{LIG}{\lc{L}{l}}{\lclig{FL}{fl}} + \comment{The letter `{f}'.} +\endsetslot + +\setslot{\lc{G}{g}} + \comment{The letter `{g}'.} +\endsetslot + +\setslot{\lc{H}{h}} + \comment{The letter `{h}'.} +\endsetslot + +\setslot{\lc{I}{i}} + \comment{The letter `{i}'.} +\endsetslot + +\setslot{\lc{J}{j}} + \comment{The letter `{j}'.} +\endsetslot + +\setslot{\lc{K}{k}} + \comment{The letter `{k}'.} +\endsetslot + +\setslot{\lc{L}{l}} + \comment{The letter `{l}'.} +\endsetslot + +\setslot{\lc{M}{m}} + \comment{The letter `{m}'.} +\endsetslot + +\setslot{\lc{N}{n}} + \comment{The letter `{n}'.} +\endsetslot + +\setslot{\lc{O}{o}} + \comment{The letter `{o}'.} +\endsetslot + +\setslot{\lc{P}{p}} + \comment{The letter `{p}'.} +\endsetslot + +\setslot{\lc{Q}{q}} + \comment{The letter `{q}'.} +\endsetslot + +\setslot{\lc{R}{r}} + \comment{The letter `{r}'.} +\endsetslot + +\setslot{\lc{S}{s}} + \comment{The letter `{s}'.} +\endsetslot + +\setslot{\lc{T}{t}} + \comment{The letter `{t}'.} +\endsetslot + +\setslot{\lc{U}{u}} + \comment{The letter `{u}'.} +\endsetslot + +\setslot{\lc{V}{v}} + \comment{The letter `{v}'.} +\endsetslot + +\setslot{\lc{W}{w}} + \comment{The letter `{w}'.} +\endsetslot + +\setslot{\lc{X}{x}} + \comment{The letter `{x}'.} +\endsetslot + +\setslot{\lc{Y}{y}} + \comment{The letter `{y}'.} +\endsetslot + +\setslot{\lc{Z}{z}} + \comment{The letter `{z}'.} +\endsetslot + +\setslot{rangedash} + \ligature{LIG}{hyphen}{punctdash} + \comment{The number range dash `1--9'. In a monowidth font, this + might be set as `{\tt 1{-}9}'.} +\endsetslot + +\setslot{punctdash} + \comment{The punctuation dash `Oh---boy.' In a monowidth font, this + might be set as `{\tt Oh{-}{-}boy.}'} +\endsetslot + +\setslot{hungarumlaut} + \comment{The long Hungarian umlaut `\H a'.} +\endsetslot + +\setslot{tilde} + \comment{The tilde accent `\~a'.} +\endsetslot + +\comment{\section{Non-standard ligatures}} + +\nextslot{"81} + +\setslot{ss} + \comment{The `ss' ligature.} +\endsetslot + +\setslot{st} + \comment{The `st' ligature.} +\endsetslot + +\setslot{sf} + \comment{The `sf' ligature.} +\endsetslot + +\setslot{ff} + \comment{The `ff' ligature.} +\endsetslot + +\setslot{ch} + \comment{The `ch' ligature.} +\endsetslot + +\setslot{ck} + \comment{The `ck' ligature.} +\endsetslot + +\skipslots{2} + +\setslot{asmalle} + \comment{The letter `a' with little e at top.} +\endsetslot + +\setslot{adieresis} + \comment{the letter `\"a'} +\endsetslot + +\setslot{tz} + \comment{The `tz' ligature.} +\endsetslot + +\skipslots{1} + +\setslot{sround} + \comment{The letter round `s'.} +\endsetslot + +\skipslots{2} + +\setslot{esmalle} + \comment{The letter `e' with little e at top.} +\endsetslot + +\setslot{edieresis} + \comment{the letter `\"e'} +\endsetslot + +\nextslot{"99} + +\setslot{osmalle} + \comment{The letter `o' with little e at top.} +\endsetslot + +\setslot{odieresis} + \comment{the letter `\"o'} +\endsetslot + +\skipslots{3} + +\setslot{usmalle} + \comment{The letter `u' with little e at top.} +\endsetslot + +\setslot{udieresis} + \comment{the letter `\"u'} +\endsetslot + +\nextslot{"A4} + +\setslot{varsection} + \comment{Variant of section sign `\S'.} +\endsetslot + +\nextslot{"C9} + +\setslot{etc} + \comment{The abbreviation sign `etc'.} +\endsetslot + + +\endencoding +\end{document} +%</yfraketx> +% \end{macrocode} +% +% +% \section{The \texttt{yswab} text encoding vector} +% +% Here I describe the original encoding of the yswab font by Yannis +% Haralambous. This file is read when |yswab.pl| is converted into +% |yswab.mtx| in order to be digested by \texttt{fontinst}. +% +% FixMe: Probably this file could easily be simplified very +% much, especially the metric setting may be superfluous. But I don't know. +% \begin{macrocode} +%<*yswabetx> +\relax + +\documentclass[twocolumn]{article} +\usepackage{fontdoc} + +\title{The \texttt{yswab} text encoding vector} +\author{Torsten Bronger} +\date{10 April 2002 \\ +Version 1.0} + +\begin{document} +\maketitle + +\section{Introduction} + +This document describes the encoding of yswab (schwabacher). + +\encoding + +\needsfontinstversion{1.801} + + +\comment{\section{Default values}} + +\setcommand\lc#1#2{#2} +\setcommand\uc#1#2{#1} +\setcommand\lclig#1#2{#2} +\setcommand\uclig#1#2{#1} +\setcommand\digit#1{#1} +\setcommand\tty{n} +\setcommand\currency{dollar} + +\setstr{codingscheme}{UNSPECIFIED} + +\setint{italicslant}{0} + +\ifisglyph{x}\then + \setint{xheight}{\height{x}} +\else + \setint{xheight}{500} +\fi + +\ifisglyph{space}\then + \setint{interword}{\width{space}} +\else\ifisglyph{i}\then + \setint{interword}{\width{i}} +\else + \setint{interword}{333} +\fi\fi + + +\comment{\section{Default font dimensions}} + +\setint{fontdimen(1)}{\int{italicslant}} % italic slant +\setint{fontdimen(2)}{\int{interword}} % interword space +\ifisint{monowidth}\then + \setint{fontdimen(3)}{0} % interword stretch + \setint{fontdimen(4)}{0} % interword shrink +\else + \setint{fontdimen(3)}{\scale{\int{interword}}{600}}% interword stretch + \setint{fontdimen(4)}{\scale{\int{interword}}{240}}% interword shrink +\fi +\setint{fontdimen(5)}{\int{xheight}} % x-height +\setint{fontdimen(6)}{1000} % quad +\ifisint{monowidth}\then + \setint{fontdimen(7)}{\int{interword}} % extra space after . +\else + \setint{fontdimen(7)}{\scale{\int{interword}}{240}}% extra space after . +\fi + +\comment{\section{The encoding}} + +\nextslot{"10} + +\setslot{dotlessi} + \comment{A dotless i like `\i'} +\endsetslot + +\setslot{dotlessj} + \comment{A dotless j like `\j'} +\endsetslot + +\setslot{grave} + \comment{The grave accent `\`a'.} +\endsetslot + +\setslot{acute} + \comment{The acute accent `\'a'.} +\endsetslot + +\setslot{caron} + \comment{The caron or h\'a\v cek accent `\v a'.} +\endsetslot + +\setslot{breve} + \comment{The breve accent `\u a'.} +\endsetslot + +\setslot{macron} + \comment{The macron accent `\=a'.} +\endsetslot + +\setslot{ringfitted} + \comment{The ring accent `\aa', fitted to be the same width as an + upper case `A'.} +\endsetslot + +\setslot{cedilla} + \comment{The cedilla accent `\c a'.} +\endsetslot + +\skipslots{1} + +\setslot{\lc{SS}{germandbls}} + \comment{The letter `\ss'.} +\endsetslot + +\nextslot{"21} + +\setslot{exclam} + \comment{The exclamation mark `!'.} +\endsetslot + +\setslot{quotedblleft} + \comment{The English opening quote mark `\,\textquotedblleft\,'.} +\endsetslot + +\setslot{numbersign} + \comment{The hash sign `\#'.} +\endsetslot + +\skipslots{1} + +\setslot{percent} + \comment{The percent sign `\%'.} +\endsetslot + +\skipslots{1} + +\setslot{quoteright} + \ligature{LIG}{quoteright}{quotedblright} + \comment{The English closing quotation mark `\,'\,'.} +\endsetslot + +\setslot{parenleft} + \comment{The opening parenthesis `('.} +\endsetslot + +\setslot{parenright} + \comment{The closing parenthesis `)'.} +\endsetslot + +\setslot{asterisk} + \comment{The raised asterisk `*'.} +\endsetslot + +\setslot{plus} + \comment{The addition sign `+'.} +\endsetslot + +\setslot{comma} + \comment{The comma `,'.} +\endsetslot + +\setslot{hyphen} + \ligature{LIG}{hyphen}{rangedash} + \comment{The hyphen `-'.} +\endsetslot + +\setslot{period} + \comment{The full point `.'.} +\endsetslot + +\setslot{slash} + \comment{The forward oblique `/'.} +\endsetslot + +\setslot{\digit{zero}} + \comment{The number zero `0'. This (and all the other numerals) may be + old style or ranging digits.} +\endsetslot + +\setslot{\digit{one}} + \comment{The number one `1'.} +\endsetslot + +\setslot{\digit{two}} + \comment{The number two `2'.} +\endsetslot + +\setslot{\digit{three}} + \comment{The number three `3'.} +\endsetslot + +\setslot{\digit{four}} + \comment{The number four `4'.} +\endsetslot + +\setslot{\digit{five}} + \comment{The number five `5'.} +\endsetslot + +\setslot{\digit{six}} + \comment{The number six `6'.} +\endsetslot + +\setslot{\digit{seven}} + \comment{The number seven `7'.} +\endsetslot + +\setslot{\digit{eight}} + \comment{The number eight `8'.} +\endsetslot + +\setslot{\digit{nine}} + \comment{The number nine `9'.} +\endsetslot + +\setslot{colon} + \comment{The colon punctuation mark `:'.} +\endsetslot + +\skipslots{1} + +\setslot{section} + \comment{The section sign `{\S}'.} +\endsetslot + +\setslot{equal} + \comment{The equals sign `='.} +\endsetslot + +\skipslots{1} + +\setslot{question} + \comment{The question mark `?'.} +\endsetslot + +\skipslots{1} + +\setslot{\uc{A}{a}} + \comment{The letter `{A}'.} +\endsetslot + +\setslot{\uc{B}{b}} + \comment{The letter `{B}'.} +\endsetslot + +\setslot{\uc{C}{c}} + \comment{The letter `{C}'.} +\endsetslot + +\setslot{\uc{D}{d}} + \comment{The letter `{D}'.} +\endsetslot + +\setslot{\uc{E}{e}} + \comment{The letter `{E}'.} +\endsetslot + +\setslot{\uc{F}{f}} + \comment{The letter `{F}'.} +\endsetslot + +\setslot{\uc{G}{g}} + \comment{The letter `{G}'.} +\endsetslot + +\setslot{\uc{H}{h}} + \comment{The letter `{H}'.} +\endsetslot + +\setslot{\uc{I}{i}} + \comment{The letter `{I}'.} +\endsetslot + +\setslot{\uc{J}{j}} + \comment{The letter `{J}'.} +\endsetslot + +\setslot{\uc{K}{k}} + \comment{The letter `{K}'.} +\endsetslot + +\setslot{\uc{L}{l}} + \comment{The letter `{L}'.} +\endsetslot + +\setslot{\uc{M}{m}} + \comment{The letter `{M}'.} +\endsetslot + +\setslot{\uc{N}{n}} + \comment{The letter `{N}'.} +\endsetslot + +\setslot{\uc{O}{o}} + \comment{The letter `{O}'.} +\endsetslot + +\setslot{\uc{P}{p}} + \comment{The letter `{P}'.} +\endsetslot + +\setslot{\uc{Q}{q}} + \comment{The letter `{Q}'.} +\endsetslot + +\setslot{\uc{R}{r}} + \comment{The letter `{R}'.} +\endsetslot + +\setslot{\uc{S}{s}} + \comment{The letter `{S}'.} +\endsetslot + +\setslot{\uc{T}{t}} + \comment{The letter `{T}'.} +\endsetslot + +\setslot{\uc{U}{u}} + \comment{The letter `{U}'.} +\endsetslot + +\setslot{\uc{V}{v}} + \comment{The letter `{V}'.} +\endsetslot + +\setslot{\uc{W}{w}} + \comment{The letter `{W}'.} +\endsetslot + +\setslot{\uc{X}{x}} + \comment{The letter `{X}'.} +\endsetslot + +\setslot{\uc{Y}{y}} + \comment{The letter `{Y}'.} +\endsetslot + +\setslot{\uc{Z}{z}} + \comment{The letter `{Z}'.} +\endsetslot + +\setslot{bracketleft} + \comment{The opening square bracket `['.} +\endsetslot + +\setslot{quotedblbase} + \comment{A German double quote mark `,\kern-0.1em,' similar to two commas, + but with tighter letterspacing and different sidebearings.} +\endsetslot + +\setslot{bracketright} + \comment{The closing square bracket `]'.} +\endsetslot + +\setslot{circumflex} + \comment{The circumflex accent `\^ a'.} +\endsetslot + +\setslot{dotaccent} + \comment{The dot accent `\.a'.} +\endsetslot + +\setslot{quoteleft} + \ligature{LIG}{quoteleft}{quotedblleft} + \comment{The English opening single quotation mark `\,`\,'.} +\endsetslot + +\setslot{\lc{A}{a}} + \comment{The letter `{a}'.} +\endsetslot + +\setslot{\lc{B}{b}} + \comment{The letter `{b}'.} +\endsetslot + +\setslot{\lc{C}{c}} + \comment{The letter `{c}'.} +\endsetslot + +\setslot{\lc{D}{d}} + \comment{The letter `{d}'.} +\endsetslot + +\setslot{\lc{E}{e}} + \comment{The letter `{e}'.} +\endsetslot + +\setslot{\lc{F}{f}} + \ligature{LIG}{\lc{I}{i}}{\lclig{FI}{fi}} + \ligature{LIG}{\lc{F}{f}}{\lclig{FF}{ff}} + \ligature{LIG}{\lc{L}{l}}{\lclig{FL}{fl}} + \comment{The letter `{f}'.} +\endsetslot + +\setslot{\lc{G}{g}} + \comment{The letter `{g}'.} +\endsetslot + +\setslot{\lc{H}{h}} + \comment{The letter `{h}'.} +\endsetslot + +\setslot{\lc{I}{i}} + \comment{The letter `{i}'.} +\endsetslot + +\setslot{\lc{J}{j}} + \comment{The letter `{j}'.} +\endsetslot + +\setslot{\lc{K}{k}} + \comment{The letter `{k}'.} +\endsetslot + +\setslot{\lc{L}{l}} + \comment{The letter `{l}'.} +\endsetslot + +\setslot{\lc{M}{m}} + \comment{The letter `{m}'.} +\endsetslot + +\setslot{\lc{N}{n}} + \comment{The letter `{n}'.} +\endsetslot + +\setslot{\lc{O}{o}} + \comment{The letter `{o}'.} +\endsetslot + +\setslot{\lc{P}{p}} + \comment{The letter `{p}'.} +\endsetslot + +\setslot{\lc{Q}{q}} + \comment{The letter `{q}'.} +\endsetslot + +\setslot{\lc{R}{r}} + \comment{The letter `{r}'.} +\endsetslot + +\setslot{\lc{S}{s}} + \comment{The letter `{s}'.} +\endsetslot + +\setslot{\lc{T}{t}} + \comment{The letter `{t}'.} +\endsetslot + +\setslot{\lc{U}{u}} + \comment{The letter `{u}'.} +\endsetslot + +\setslot{\lc{V}{v}} + \comment{The letter `{v}'.} +\endsetslot + +\setslot{\lc{W}{w}} + \comment{The letter `{w}'.} +\endsetslot + +\setslot{\lc{X}{x}} + \comment{The letter `{x}'.} +\endsetslot + +\setslot{\lc{Y}{y}} + \comment{The letter `{y}'.} +\endsetslot + +\setslot{\lc{Z}{z}} + \comment{The letter `{z}'.} +\endsetslot + +\setslot{rangedash} + \ligature{LIG}{hyphen}{punctdash} + \comment{The number range dash `1--9'. In a monowidth font, this + might be set as `{\tt 1{-}9}'.} +\endsetslot + +\setslot{punctdash} + \comment{The punctuation dash `Oh---boy.' In a monowidth font, this + might be set as `{\tt Oh{-}{-}boy.}'} +\endsetslot + +\setslot{dieresis} + \comment{The umlaut or dieresis accent `\"{}'.} +\endsetslot + +\setslot{tilde} + \comment{The tilde accent `\~a'.} +\endsetslot + +\comment{\section{Non-standard ligatures}} + +\nextslot{"81} + +\setslot{ss} + \comment{The `ss' ligature.} +\endsetslot + +\setslot{st} + \comment{The `st' ligature.} +\endsetslot + +\setslot{sf} + \comment{The `sf' ligature.} +\endsetslot + +\setslot{ff} + \comment{The `ff' ligature.} +\endsetslot + +\setslot{ch} + \comment{The `ch' ligature.} +\endsetslot + +\setslot{ck} + \comment{The `ck' ligature.} +\endsetslot + +\skipslots{2} + +\setslot{asmalle} + \comment{The letter `a' with little e at top.} +\endsetslot + +\setslot{adieresis} + \comment{the letter `\"a'} +\endsetslot + +\skipslots{2} + +\setslot{sround} + \comment{The letter round `s'.} +\endsetslot + +\skipslots{2} + +\setslot{esmalle} + \comment{The letter `e' with little e at top.} +\endsetslot + +\setslot{edieresis} + \comment{the letter `\"e'} +\endsetslot + +\nextslot{"99} + +\setslot{osmalle} + \comment{The letter `o' with little e at top.} +\endsetslot + +\setslot{odieresis} + \comment{the letter `\"o'} +\endsetslot + +\skipslots{3} + +\setslot{usmalle} + \comment{The letter `u' with little e at top.} +\endsetslot + +\setslot{udieresis} + \comment{the letter `\"u'} +\endsetslot + +\nextslot{"A4} + +\setslot{varsection} + \comment{Variant of section sign `\S'.} +\endsetslot + +\skipslots{2} + +\setslot{\lc{varSS}{vargermandbls}} + \comment{A variant of the letter `\ss'.} +\endsetslot + + +\endencoding +\end{document} +%</yswabetx> +% \end{macrocode} +% +% +% \section{The \texttt{ygoth} text encoding vector} +% +% Here I describe the original encoding of the ygoth font by Yannis +% Haralambous. This file is read when |ygoth.pl| is converted into +% |ygoth.mtx| in order to be digested by \texttt{fontinst}. +% +% FixMe: Probably this file could easily be simplified very +% much, especially the metric setting may be superfluous. But I don't know. +% \begin{macrocode} +%<*ygothetx> +\relax + +\documentclass[twocolumn]{article} +\usepackage{fontdoc} + +\title{The \texttt{ygoth} text encoding vector} +\author{Torsten Bronger} +\date{10 April 2002 \\ +Version 1.0} + +\begin{document} +\maketitle + +\section{Introduction} + +This document describes the encoding of ygoth (textur). + +\encoding + +\needsfontinstversion{1.801} + + +\comment{\section{Default values}} + +\setcommand\lc#1#2{#2} +\setcommand\uc#1#2{#1} +\setcommand\lclig#1#2{#2} +\setcommand\uclig#1#2{#1} +\setcommand\digit#1{#1} +\setcommand\tty{n} +\setcommand\currency{dollar} + +\setstr{codingscheme}{UNSPECIFIED} + +\setint{italicslant}{0} + +\ifisglyph{x}\then + \setint{xheight}{\height{x}} +\else + \setint{xheight}{500} +\fi + +\ifisglyph{space}\then + \setint{interword}{\width{space}} +\else\ifisglyph{i}\then + \setint{interword}{\width{i}} +\else + \setint{interword}{333} +\fi\fi + + +\comment{\section{Default font dimensions}} + +\setint{fontdimen(1)}{\int{italicslant}} % italic slant +\setint{fontdimen(2)}{\int{interword}} % interword space +\ifisint{monowidth}\then + \setint{fontdimen(3)}{0} % interword stretch + \setint{fontdimen(4)}{0} % interword shrink +\else + \setint{fontdimen(3)}{\scale{\int{interword}}{600}}% interword stretch + \setint{fontdimen(4)}{\scale{\int{interword}}{240}}% interword shrink +\fi +\setint{fontdimen(5)}{\int{xheight}} % x-height +\setint{fontdimen(6)}{1000} % quad +\ifisint{monowidth}\then + \setint{fontdimen(7)}{\int{interword}} % extra space after . +\else + \setint{fontdimen(7)}{\scale{\int{interword}}{240}}% extra space after . +\fi + +\comment{\section{The encoding}} + +\nextslot{0} + +\setslot{ba} + \comment{the ligature `ba'} +\endsetslot + +\setslot{be} + \comment{the ligature `be'} +\endsetslot + +\setslot{bo} + \comment{the ligature `bo'} +\endsetslot + +\setslot{ch} + \comment{the ligature `ch'} +\endsetslot + +\setslot{ck} + \comment{the ligature `ck'} +\endsetslot + +\setslot{ct} + \comment{the ligature `ct'} +\endsetslot + +\setslot{da} + \comment{the ligature `da'} +\endsetslot + +\setslot{de} + \comment{the ligature `de'} +\endsetslot + +\setslot{do} + \comment{the ligature `do'} +\endsetslot + +\setslot{ha} + \comment{the ligature `ha'} +\endsetslot + +\setslot{he} + \comment{the ligature `he'} +\endsetslot + +\setslot{ff} + \comment{the ligature `ff'} +\endsetslot + +\setslot{fi} + \comment{the ligature `fi'} +\endsetslot + +\setslot{fl} + \comment{the ligature `fl'} +\endsetslot + +\setslot{ffi} + \comment{the ligature `ffi'} +\endsetslot + +\setslot{ffl} + \comment{the ligature `ffl'} +\endsetslot + +\setslot{dotlessi} + \comment{A dotless i like `\i'} +\endsetslot + +\setslot{dotlessj} + \comment{A dotless j like `\j'} +\endsetslot + +\setslot{ho} + \comment{the ligature `ho'} +\endsetslot + +\setslot{pa} + \comment{the ligature `pa'} +\endsetslot + +\setslot{pe} + \comment{the ligature `pe'} +\endsetslot + +\setslot{po} + \comment{the ligature `po'} +\endsetslot + +\setslot{ij} + \comment{the ligature `ij'} +\endsetslot + +\setslot{qz} + \comment{the ligature `qz'} +\endsetslot + +\setslot{va} + \comment{the ligature `va'} +\endsetslot + +\setslot{\lc{SS}{germandbls}} + \comment{The letter `\ss'.} +\endsetslot + +\setslot{\lc{AE}{ae}} + \comment{The letter `\ae'. This is a single letter, and should not be + faked with `ae'.} +\endsetslot + +\setslot{\lc{OE}{oe}} + \comment{The letter `\oe'. This is a single letter, and should not be + faked with `oe'.} +\endsetslot + +\setslot{\lc{Oslash}{oslash}} + \comment{The letter `\o'.} +\endsetslot + +\setslot{ll} + \comment{the ligature `ll'} +\endsetslot + +\setslot{ve} + \comment{the ligature `ve'} +\endsetslot + +\setslot{vu} + \comment{the ligature `vu'} +\endsetslot + +\nextslot{"21} + +\setslot{exclam} + \comment{The exclamation mark `!'.} +\endsetslot + +\setslot{quotedblright} + \comment{An English double closing quote mark `\,''\,'.} +\endsetslot + +\setslot{pp} + \comment{the ligature `pp'} +\endsetslot + +\setslot{qq} + \comment{the ligature `qq'} +\endsetslot + +\skipslots{1} + +\setslot{ss} + \comment{the ligature `ss'} +\endsetslot + +\setslot{quoteright} + \ligature{LIG}{quoteright}{quotedblright} + \comment{The English closing quotation mark `\,'\,'.} +\endsetslot + +\setslot{parenleft} + \comment{The opening parenthesis `('.} +\endsetslot + +\setslot{parenright} + \comment{The closing parenthesis `)'.} +\endsetslot + +\setslot{ssvar} + \comment{the ligature `ss' (variant)} +\endsetslot + +\setslot{ssi} + \comment{the ligature `ssi'} +\endsetslot + +\setslot{comma} + \comment{The comma `,'.} +\endsetslot + +\setslot{hyphen} + \ligature{LIG}{hyphen}{rangedash} + \comment{The hyphen `-'.} +\endsetslot + +\setslot{period} + \comment{The full point `.'.} +\endsetslot + +\setslot{ssivar} + \comment{the ligature `ssi' (variant)} +\endsetslot + +\setslot{\digit{zero}} + \comment{The number zero `0'. This (and all the other numerals) may be + old style or ranging digits.} +\endsetslot + +\setslot{\digit{one}} + \comment{The number one `1'.} +\endsetslot + +\setslot{\digit{two}} + \comment{The number two `2'.} +\endsetslot + +\setslot{\digit{three}} + \comment{The number three `3'.} +\endsetslot + +\setslot{\digit{four}} + \comment{The number four `4'.} +\endsetslot + +\setslot{\digit{five}} + \comment{The number five `5'.} +\endsetslot + +\setslot{\digit{six}} + \comment{The number six `6'.} +\endsetslot + +\setslot{\digit{seven}} + \comment{The number seven `7'.} +\endsetslot + +\setslot{\digit{eight}} + \comment{The number eight `8'.} +\endsetslot + +\setslot{\digit{nine}} + \comment{The number nine `9'.} +\endsetslot + +\setslot{colon} + \comment{The colon punctuation mark `:'.} +\endsetslot + +\setslot{semicolon} + \comment{The semi-colon punctuation mark `;'.} +\endsetslot + +\setslot{st} + \comment{the ligature `st'} +\endsetslot + +\setslot{stvar} + \comment{the ligature `st' (variant)} +\endsetslot + +\setslot{tz} + \comment{the ligature `tz'} +\endsetslot + +\setslot{question} + \comment{The question mark `?'.} +\endsetslot + +\skipslots{1} + +\setslot{\uc{A}{a}} + \comment{The letter `{A}'.} +\endsetslot + +\setslot{\uc{B}{b}} + \comment{The letter `{B}'.} +\endsetslot + +\setslot{\uc{C}{c}} + \comment{The letter `{C}'.} +\endsetslot + +\setslot{\uc{D}{d}} + \comment{The letter `{D}'.} +\endsetslot + +\setslot{\uc{E}{e}} + \comment{The letter `{E}'.} +\endsetslot + +\setslot{\uc{F}{f}} + \comment{The letter `{F}'.} +\endsetslot + +\setslot{\uc{G}{g}} + \comment{The letter `{G}'.} +\endsetslot + +\setslot{\uc{H}{h}} + \comment{The letter `{H}'.} +\endsetslot + +\setslot{\uc{I}{i}} + \comment{The letter `{I}'.} +\endsetslot + +\setslot{\uc{J}{j}} + \comment{The letter `{J}'.} +\endsetslot + +\setslot{\uc{K}{k}} + \comment{The letter `{K}'.} +\endsetslot + +\setslot{\uc{L}{l}} + \comment{The letter `{L}'.} +\endsetslot + +\setslot{\uc{M}{m}} + \comment{The letter `{M}'.} +\endsetslot + +\setslot{\uc{N}{n}} + \comment{The letter `{N}'.} +\endsetslot + +\setslot{\uc{O}{o}} + \comment{The letter `{O}'.} +\endsetslot + +\setslot{\uc{P}{p}} + \comment{The letter `{P}'.} +\endsetslot + +\setslot{\uc{Q}{q}} + \comment{The letter `{Q}'.} +\endsetslot + +\setslot{\uc{R}{r}} + \comment{The letter `{R}'.} +\endsetslot + +\setslot{\uc{S}{s}} + \comment{The letter `{S}'.} +\endsetslot + +\setslot{\uc{T}{t}} + \comment{The letter `{T}'.} +\endsetslot + +\setslot{\uc{U}{u}} + \comment{The letter `{U}'.} +\endsetslot + +\setslot{\uc{V}{v}} + \comment{The letter `{V}'.} +\endsetslot + +\setslot{\uc{W}{w}} + \comment{The letter `{W}'.} +\endsetslot + +\setslot{\uc{X}{x}} + \comment{The letter `{X}'.} +\endsetslot + +\setslot{\uc{Y}{y}} + \comment{The letter `{Y}'.} +\endsetslot + +\setslot{\uc{Z}{z}} + \comment{The letter `{Z}'.} +\endsetslot + +\setslot{adieresis} + \comment{the letter `\"a'} +\endsetslot + +\setslot{edieresis} + \comment{the letter `\"e'} +\endsetslot + +\setslot{odieresis} + \comment{the letter `\"o'} +\endsetslot + +\setslot{udieresis} + \comment{the letter `\"u'} +\endsetslot + +\setslot{quotedblleft} + \comment{The English opening quote mark `\,\textquotedblleft\,'.} +\endsetslot + +\setslot{sround} + \comment{The letter round `s'.} +\endsetslot + +\setslot{\lc{A}{a}} + \comment{The letter `{a}'.} +\endsetslot + +\setslot{\lc{B}{b}} + \comment{The letter `{b}'.} +\endsetslot + +\setslot{\lc{C}{c}} + \comment{The letter `{c}'.} +\endsetslot + +\setslot{\lc{D}{d}} + \comment{The letter `{d}'.} +\endsetslot + +\setslot{\lc{E}{e}} + \comment{The letter `{e}'.} +\endsetslot + +\setslot{\lc{F}{f}} + \ligature{LIG}{\lc{I}{i}}{\lclig{FI}{fi}} + \ligature{LIG}{\lc{F}{f}}{\lclig{FF}{ff}} + \ligature{LIG}{\lc{L}{l}}{\lclig{FL}{fl}} + \comment{The letter `{f}'.} +\endsetslot + +\setslot{\lc{G}{g}} + \comment{The letter `{g}'.} +\endsetslot + +\setslot{\lc{H}{h}} + \comment{The letter `{h}'.} +\endsetslot + +\setslot{\lc{I}{i}} + \comment{The letter `{i}'.} +\endsetslot + +\setslot{\lc{J}{j}} + \comment{The letter `{j}'.} +\endsetslot + +\setslot{\lc{K}{k}} + \comment{The letter `{k}'.} +\endsetslot + +\setslot{\lc{L}{l}} + \comment{The letter `{l}'.} +\endsetslot + +\setslot{\lc{M}{m}} + \comment{The letter `{m}'.} +\endsetslot + +\setslot{\lc{N}{n}} + \comment{The letter `{n}'.} +\endsetslot + +\setslot{\lc{O}{o}} + \comment{The letter `{o}'.} +\endsetslot + +\setslot{\lc{P}{p}} + \comment{The letter `{p}'.} +\endsetslot + +\setslot{\lc{Q}{q}} + \comment{The letter `{q}'.} +\endsetslot + +\setslot{\lc{R}{r}} + \comment{The letter `{r}'.} +\endsetslot + +\setslot{\lc{S}{s}} + \comment{The letter `{s}'.} +\endsetslot + +\setslot{\lc{T}{t}} + \comment{The letter `{t}'.} +\endsetslot + +\setslot{\lc{U}{u}} + \comment{The letter `{u}'.} +\endsetslot + +\setslot{\lc{V}{v}} + \comment{The letter `{v}'.} +\endsetslot + +\setslot{\lc{W}{w}} + \comment{The letter `{w}'.} +\endsetslot + +\setslot{\lc{X}{x}} + \comment{The letter `{x}'.} +\endsetslot + +\setslot{\lc{Y}{y}} + \comment{The letter `{y}'.} +\endsetslot + +\setslot{\lc{Z}{z}} + \comment{The letter `{z}'.} +\endsetslot + +\setslot{rangedash} + \ligature{LIG}{hyphen}{punctdash} + \comment{The number range dash `1--9'. In a monowidth font, this + might be set as `{\tt 1{-}9}'.} +\endsetslot + +\setslot{punctdash} + \comment{The punctuation dash `Oh---boy.' In a monowidth font, this + might be set as `{\tt Oh{-}{-}boy.}'} +\endsetslot + +\endencoding +\end{document} +%</ygothetx> +% \end{macrocode} +% +% +% \section{First cleaning up} +% +% In this file (|setglyph.mtx|), we do two things: First, we move some +% ligatures from the poriginal encoding to the correct position in my +% pseudo-T1, ans secondly we unset some glyphs that shouldn't be used from +% the Haralambous font. +% +% \begin{macrocode} +%<*setglyphmtx> +\relax + +\metrics + +% \end{macrocode} +% +% \subsection{Moving the ligatures} +% +% E.\,g., the ``ck'' ligature must end up in the T1 slot called +% ``ffl ligature''. Here I do so. Of cause, only if the respective ligature +% is available at all. +% \begin{macrocode} +\setcommand\setglyphmaybe#1#2{% +\unsetglyph{#1} +\ifisglyph{#2}\then +\setglyph{#1} + \glyph{#2}{1000} +\endsetglyph +\fi +} + +\setglyphmaybe{dotlessj}{si} +\setglyphmaybe{ffi}{ch} +\setglyphmaybe{ffl}{ck} +\setglyphmaybe{backslash}{ft} +\setglyphmaybe{asciicircum}{ss} +\setglyphmaybe{underscore}{st} +\setglyphmaybe{bar}{tz} + +% \end{macrocode} +% +% \subsection{Taking accents from CM} +% +% All ligatures are taken from CM, only the Hungarian umlaut comes from EC +% (see below). The Haralambous fonts don't contain all of them anyway. +% \begin{macrocode} +\unsetglyph{circumflex} +\unsetglyph{breve} +\unsetglyph{ring} +\unsetglyph{macron} +\unsetglyph{caron} +\unsetglyph{tilde} +\unsetglyph{quotedblleft} +\unsetglyph{quotedblright} +\unsetglyph{quotedblbase} +\unsetglyph{tilde} +\unsetglyph{slash} + + +\endmetrics +%</setglyphmtx> +% \end{macrocode} +% +% +% \section{Making the accents smaller} +% +% This part will eventually come to the file |unsetacc.mtx|. I want to take +% the accents not from the original computer modern or their T1 variant, but +% from the seven point version, at least for the Fraktur font. These smaller +% accents look nicer in my opinion, because the dainty Fraktur letters can't +% cope with usual ten point accents. +% \begin{macrocode} +%<*unsetaccmtx> +\relax + +\metrics + +% \end{macrocode} +% The following three lines save the old height of the tilde character in a +% variable called |oldtildeheight| in order to be able to shift the smaller +% accents upwards to the correct height later. Probably this was superfluous, +% because I have to tweak the heights anyway. +% \begin{macrocode} +\setint{oldtildeheight}{\height{tilde}} +\def\temp{\int{oldtildeheight}} +\xdef\oldtildeheight{\the\temp} + +\unsetglyph{grave} +\unsetglyph{acute} +\unsetglyph{circumflex} +\unsetglyph{tilde} +\unsetglyph{ring} +\unsetglyph{caron} +\unsetglyph{breve} +\unsetglyph{dotaccent} + +\endmetrics +%</unsetaccmtx> +% \end{macrocode} +% +% +% \section{The Hungarian umlaut} +% +% This wanders eventually to the file |unsetcm.mtx| and does not more than +% just unsetting the Hungarian umlaut accent. The reason for that is that +% this symbol looks much nicer in the EC fonts, especially because the normal +% dieresis accent looks wuite similar to the CM version of the Hungarian +% umlaut, which is potentially dangerous. (Hungarian uses both.) +% \begin{macrocode} +%<*unsetcmmtx> +\relax + +\metrics + +\unsetglyph{hungarumlaut} + +\endmetrics +%</unsetcmmtx> +% \end{macrocode} +% +% +% \section{Unsetting the diacritics} +% +% In this section (eventually the file |unsetdia.mtx|), I make all +% pathologial latter, i.\,e.\ all letters with diacritic signs, undefined. +% After that, I can set some critical characters manually in the ``cleanup'' +% files (see below), ar I can let them be constrcuted in |blackletter.mtx|. +% \begin{macrocode} +%<*unsetdiamtx> +\relax + +\metrics + +\unsetglyph{hyphenchar} + +\unsetglyph{Abreve} +\unsetglyph{Aogonek} +\unsetglyph{Cacute} +\unsetglyph{Ccaron} +\unsetglyph{Dcaron} +\unsetglyph{Ecaron} +\unsetglyph{Eogonek} +\unsetglyph{Gbreve} +\unsetglyph{Lacute} +\unsetglyph{Lcaron} +\unsetglyph{Lslash} +\unsetglyph{Nacute} +\unsetglyph{Ncaron} +\unsetglyph{Ng} +\unsetglyph{Ohungarumlaut} +\unsetglyph{Racute} +\unsetglyph{Rcaron} +\unsetglyph{Sacute} +\unsetglyph{Scaron} +\unsetglyph{Scedilla} +\unsetglyph{Tcaron} +\unsetglyph{Tcedilla} +\unsetglyph{Uhungarumlaut} +\unsetglyph{Uring} +\unsetglyph{Ydieresis} +\unsetglyph{Zacute} +\unsetglyph{Zcaron} +\unsetglyph{Zdotaccent} +\unsetglyph{IJ} +\unsetglyph{Idotaccent} +\unsetglyph{dbar} + +\unsetglyph{abreve} +\unsetglyph{aogonek} +\unsetglyph{cacute} +\unsetglyph{ccaron} +\unsetglyph{dcaron} +\unsetglyph{ecaron} +\unsetglyph{eogonek} +\unsetglyph{gbreve} +\unsetglyph{lacute} +\unsetglyph{lcaron} +\unsetglyph{lslash} +\unsetglyph{nacute} +\unsetglyph{ncaron} +\unsetglyph{ng} +\unsetglyph{ohungarumlaut} +\unsetglyph{racute} +\unsetglyph{rcaron} +\unsetglyph{sacute} +\unsetglyph{scaron} +\unsetglyph{scedilla} +\unsetglyph{tcaron} +\unsetglyph{tcedilla} +\unsetglyph{uhungarumlaut} +\unsetglyph{uring} +\unsetglyph{ydieresis} +\unsetglyph{zacute} +\unsetglyph{zcaron} +\unsetglyph{zdotaccent} +\unsetglyph{ij} + +\unsetglyph{Agrave} +\unsetglyph{Aacute} +\unsetglyph{Acircumflex} +\unsetglyph{Atilde} +\unsetglyph{Adieresis} +\unsetglyph{Aring} +\unsetglyph{AE} +\unsetglyph{Ccedilla} +\unsetglyph{Egrave} +\unsetglyph{Eacute} +\unsetglyph{Ecircumflex} +\unsetglyph{Edieresis} +\unsetglyph{Igrave} +\unsetglyph{Iacute} +\unsetglyph{Icircumflex} +\unsetglyph{Idieresis} +\unsetglyph{Eth} +\unsetglyph{Ntilde} +\unsetglyph{Ograve} +\unsetglyph{Oacute} +\unsetglyph{Ocircumflex} +\unsetglyph{Otilde} +\unsetglyph{Odieresis} +\unsetglyph{OE} +\unsetglyph{Oslash} +\unsetglyph{Ugrave} +\unsetglyph{Uacute} +\unsetglyph{Ucircumflex} +\unsetglyph{Udieresis} +\unsetglyph{Yacute} +\unsetglyph{Thorn} +\unsetglyph{SS} +\unsetglyph{agrave} +\unsetglyph{aacute} +\unsetglyph{acircumflex} +\unsetglyph{atilde} +\unsetglyph{adieresis} +\unsetglyph{aring} +\unsetglyph{ae} +\unsetglyph{ccedilla} +\unsetglyph{egrave} +\unsetglyph{eacute} +\unsetglyph{ecircumflex} +\unsetglyph{edieresis} +\unsetglyph{igrave} +\unsetglyph{iacute} +\unsetglyph{icircumflex} +\unsetglyph{idieresis} +\unsetglyph{eth} +\unsetglyph{ntilde} +\unsetglyph{ograve} +\unsetglyph{oacute} +\unsetglyph{ocircumflex} +\unsetglyph{otilde} +\unsetglyph{odieresis} +\unsetglyph{oe} +\unsetglyph{oslash} +\unsetglyph{ugrave} +\unsetglyph{uacute} +\unsetglyph{ucircumflex} +\unsetglyph{udieresis} +\unsetglyph{yacute} +\unsetglyph{thorn} +\unsetglyph{germandbls} + +\endmetrics +%</unsetdiamtx> +% \end{macrocode} +% +% +% \section{Getting the sterling symbol} +% +% This part will eventually come to the file |unsetste.mtx|. It's quite +% annoying that this is necessary, but I haven't found a better solution. +% Since I don't want to take the sterling symbol from the EC fonts, I have +% to unset it here. Not more. +% \begin{macrocode} +%<*unsetstemtx> +\relax + +\metrics + +\unsetglyph{sterling} + +\endmetrics +%</unsetstemtx> +% \end{macrocode} +% +% +% \section{Final touches to yfrak} +% +% \begin{macrocode} +%<*fcleanupmtx> +\relax + +\metrics + +% \end{macrocode} +% +% \subsection{Accent positioning} +% +% A top accent is set by placing the center of the accent at the given +% position along the width of the letter, raised up by the difference +% between the height of the letter and the xheight. +% \begin{macrocode} +\setcommand\topaccent#1#2#3{ + \push + \moveup{\max{0}{\sub{\height{#1}}{\int{xheight}}}} + \movert{\add{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + {\scale{\sub{\height{#1}}{\int{xheight}}}{\int{italicslant}}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% A bottom accent is set by placing the center of the accent at the given +% position along the width of the letter. +% \begin{macrocode} +\setcommand\botaccent#1#2#3{ + \push + \movert{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% The following values are for the |#3| paramter in the above macros. +% \begin{macrocode} +\setcommand\Askew{550} +\setcommand\Uskew{470} + +% \end{macrocode} +% |\adjustheight| is meant for characters with a too small height, which is +% true for all German umlauts, for example. +% \begin{macrocode} +\setcommand\adjustheight#1{% +\resetglyph{#1} + \glyph{#1}{1000} + \resetheight{\height{k}} +\endsetglyph +} + +\adjustheight{adieresis} +\adjustheight{edieresis} +\adjustheight{odieresis} +\adjustheight{udieresis} +\adjustheight{i} +\adjustheight{j} + +% \end{macrocode} +% +% \subsection{Setting up the accents} +% +% Here I copy the save value of the height of the tilde accent to +% |pushvalue|. +% \begin{macrocode} +\setint{pushvalue}{\sub{\oldtildeheight}{\height{tilde}}} + +% \end{macrocode} +% This routine moves the accent up. The accent is smaller than ten points +% (seven points), and this routine tries to ensure that it still has the +% correct height. It doesn't do this perfectly, therefor I need the special +% tweak parameter |#2|, which is usually negative. +% \begin{macrocode} +\setcommand\pushaccent#1#2{ + \resetglyph{#1} + \moveup{\add{\int{pushvalue}}{#2}} + \glyph{#1}{1000} + \endsetglyph +} + +% \end{macrocode} +% Here now the concrete accents. +% \begin{macrocode} +\pushaccent{grave}{-20} +\pushaccent{acute}{-20} +\pushaccent{circumflex}{-40} +\pushaccent{tilde}{-70} +\pushaccent{hungarumlaut}{-20} +% \end{macrocode} +% I handle the dieresis separately because it comes from yswab, and not from +% CM. +% \begin{macrocode} +\resetglyph{dieresis} + \moveup{160} + \glyph{dieresis}{1000} +\endsetglyph +\pushaccent{ring}{-50} +\pushaccent{caron}{-50} +\pushaccent{breve}{-20} +\pushaccent{dotaccent}{-30} + +% \end{macrocode} +% I want to have the original ring accent from yfrak. It's quite nice. +% \begin{macrocode} +\resetglyph{ring} + \glyph{ringfitted}{1000} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Correcting false characters boxes} +% +% The depth and height of the ``ch'' and ``ck'' ligature are wrong. Here I +% correct that. +% \begin{macrocode} +\resetglyph{ffi} + \glyph{ffi}{1000} + \resetheight{\height{h}} + \resetdepth{\depth{h}} +\endsetglyph + +\resetglyph{ffl} + \glyph{ffl}{1000} + \resetheight{\height{k}} +\endsetglyph + +\resetint{interword}{250} + +% \end{macrocode} +% Similar correction for comma, period and semicolon. +% \begin{macrocode} +\resetglyph{comma} + \glyph{comma}{1000} + \resetheight{\height{quotesinglbase}} + \resetdepth{\depth{quotesinglbase}} +\endsetglyph + +\resetglyph{period} + \glyph{period}{1000} + \resetheight{\height{quotesinglbase}} +\endsetglyph + +\resetglyph{semicolon} + \glyph{semicolon}{1000} + \resetdepth{\depth{comma}} +\endsetglyph + +% \end{macrocode} +% The following ligatures are not available in yfrak and must be faked in +% |blackletter.mtx|. +% \begin{macrocode} +\unsetglyph{dotlessj} +\unsetglyph{fi} +\unsetglyph{fl} +\unsetglyph{backslash} + +% \end{macrocode} +% +% \subsection{Setting up the quotes} +% +% What follows, are hopeless tricks to get nice double and single quotes. I +% move the glyphes arbitrarily around, in order to get nice spacing to +% following or preceding letters and to avaiod EC characters here. +% \begin{macrocode} +\resetglyph{quotedblleft} + \movert{-100} + \glyph{quotedblleft}{1000} + \resetwidth{\add{\width{quotedblbase}}{70}} +\endsetglyph + +\resetglyph{quotedblright} + \movert{20} + \glyph{quotedblright}{1000} + \resetwidth{\add{\width{quotedblbase}}{20}} +\endsetglyph + +\resetglyph{quotesinglbase} + \moveup{\sub{\height{quotedblbase}}{\height{quoteright}}} + \glyph{quoteright}{1000} + \samesize{quotesinglbase} +\endsetglyph + +\resetglyph{quotedblbase} + \moveup{\sub{\height{quotedblbase}}{\height{quotedblright}}} + \movert{-60} + \glyph{quotedblright}{1000} + \resetheight{\height{quotedblbase}} + \resetdepth{\depth{quotedblbase}} + \resetwidth{\add{\width{quotedblbase}}{40}} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Faking the glyphs} +% +% Now I try to fake or improve the letters for the latin T1 version of yfrak. +% Most of this should be easy to understand. +% \begin{macrocode} +\resetglyph{A} + \glyph{A}{1000} + \resetheight{\sub{\height{A}}{50}} +\endsetglyph + +\setglyph{Abreve} + \topaccent{A}{breve}{\Askew} +\endsetglyph + +\setglyph{Aogonek} + \botaccent{A}{ogonek}{610} +\endsetglyph + +\setglyph{Eogonek} + \botaccent{E}{ogonek}{590} +\endsetglyph + +\setglyph{Lcaron} + \glyph{L}{1000} + \movert{-100} + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{Lslash} + \glyph{lslashslash}{1000} + \movert{-270} + \glyph{L}{1000} +\endsetglyph + +\setglyph{Ng} + \glyph{S}{1000} +\endsetglyph + +\setglyph{Uhungarumlaut} + \topaccent{U}{hungarumlaut}{\Uskew} +\endsetglyph + +\setglyph{Uring} + \topaccent{U}{ring}{\Uskew} +\endsetglyph + +\setglyph{dbar} + \push + \movert{-160} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{470}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{d}{1000} + \samesize{d} +\endsetglyph + +\setglyph{lslash} + \glyph{lslashslash}{1000} + \movert{-210} + \glyph{l}{1000} +\endsetglyph + +\setglyph{ng} + \glyph{sround}{1000} +\endsetglyph + +\setglyph{sacute} + \topaccent{sround}{acute}{500} +\endsetglyph + +\setglyph{scaron} + \topaccent{sround}{caron}{500} +\endsetglyph + +\setglyph{scedilla} + \botaccent{sround}{cedilla}{500} +\endsetglyph + +\setglyph{Agrave} + \topaccent{A}{grave}{\Askew} +\endsetglyph + +\setglyph{Aacute} + \topaccent{A}{acute}{\Askew} +\endsetglyph + +\setglyph{Acircumflex} + \topaccent{A}{circumflex}{\Askew} +\endsetglyph + +\setglyph{Atilde} + \topaccent{A}{tilde}{\Askew} +\endsetglyph + +\setglyph{Adieresis} + \topaccent{A}{dieresis}{\Askew} +\endsetglyph + +\setglyph{Aring} + \topaccent{A}{ring}{\Askew} +\endsetglyph + +\resetglyph{AE} + \glyph{A}{1000} + \movert{-120} + \glyph{E}{1000} +\endsetglyph + +\setglyph{Eth} + \push + \movert{100} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{300}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{D}{1000} + \resetdepth{\depth{D}} +\endsetglyph + +\resetglyph{OE} + \glyph{O}{1000} + \movert{-100} + \glyph{E}{1000} +\endsetglyph + +\resetglyph{Oslash} + \push + \moveup{130} + \movert{170} + \glyph{slash}{800} + \pop + \glyph{O}{1000} +\endsetglyph + +\setglyph{Ugrave} + \topaccent{U}{grave}{\Uskew} +\endsetglyph + +\setglyph{Uacute} + \topaccent{U}{acute}{\Uskew} +\endsetglyph + +\setglyph{Ucircumflex} + \topaccent{U}{circumflex}{\Uskew} +\endsetglyph + +\setglyph{Udieresis} + \topaccent{U}{dieresis}{\Uskew} +\endsetglyph + +\setglyph{Thorn} + \glyph{T}{1000} + \movert{-100} + \glyph{h}{1000} +\endsetglyph + +\resetglyph{ae} + \glyph{a}{1000} + \movert{-150} + \glyph{e}{1000} +\endsetglyph + +\setglyph{eth} + \push + \movert{-100} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{700}} + {\height{macron}}} + \glyph{lslashslash}{1000} + \pop + \glyph{d}{1000} +\endsetglyph + +\resetglyph{oslash} + \push + \moveup{120} + \movert{50} + \glyph{slash}{500} + \pop + \glyph{o}{1000} +\endsetglyph + +\resetglyph{oe} + \glyph{o}{1000} + \movert{-100} + \glyph{e}{1000} +\endsetglyph + +\setglyph{thorn} + \glyph{t}{1000} + \movert{-80} + \glyph{h}{1000} +\endsetglyph + +\endmetrics +%</fcleanupmtx> +% \end{macrocode} +% +% +% \section{Final touches to yswab} +% +% \begin{macrocode} +%<*scleanupmtx> +\relax + +\metrics + +% \end{macrocode} +% +% \subsection{Accent positioning} +% +% A top accent is set by placing the center of the accent at the given +% position along the width of the letter, raised up by the difference +% between the height of the letter and the xheight. +% \begin{macrocode} +\setcommand\topaccent#1#2#3{ + \push + \moveup{\max{0}{\sub{\height{#1}}{\int{xheight}}}} + \movert{\add{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + {\scale{\sub{\height{#1}}{\int{xheight}}}{\int{italicslant}}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% A bottom accent is set by placing the center of the accent at the given +% position along the width of the letter. +% \begin{macrocode} +\setcommand\botaccent#1#2#3{ + \push + \movert{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% The following value is for the |#3| paramter in the above macros. +% \begin{macrocode} +\setcommand\Askew{580} + +% \end{macrocode} +% |\adjustheight| is meant for characters with a too small height, which is +% true for all German umlauts, for example. +% \begin{macrocode} +\setcommand\adjustheight#1{% +\resetglyph{#1} + \glyph{#1}{1000} + \resetheight{\height{k}} +\endsetglyph +} + +\adjustheight{adieresis} +\adjustheight{edieresis} +\adjustheight{odieresis} +\adjustheight{udieresis} + +% \end{macrocode} +% +% \subsection{Setting up the accents} +% +% Here I make all accents a little bit smaller to fit with ygoth. +% Additionally I push them upwards, which is accent dependent. +% \begin{macrocode} +\resetglyph{tilde} + \moveup{-40} + \glyph{tilde}{1000} +\endsetglyph + +\resetglyph{dieresis} + \moveup{-40} + \glyph{dieresis}{1000} +\endsetglyph + +% \end{macrocode} +% I want to have the original ring accent from yfrak. It's quite nice. +% \begin{macrocode} +\resetglyph{ring} + \moveup{-30} + \glyph{ringfitted}{1000} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Setting up the quotes} +% +% What follows, are hopeless tricks to get nice double and single quotes. I +% move the glyphes arbitrarily around, in order to get nice spacing to +% following or preceding letters and to avaiod EC characters here. +% \begin{macrocode} +\resetglyph{quotedblleft} + \movert{-90} + \glyph{quotedblleft}{1000} + \resetwidth{\sub{\width{quotedblleft}}{100}} +\endsetglyph + +\resetglyph{quotedblright} + \movert{20} + \glyph{quotedblright}{1000} + \resetwidth{\sub{\width{quotedblright}}{120}} +\endsetglyph + +\resetglyph{quotesinglbase} + \moveup{\sub{\height{quotedblbase}}{\height{quoteright}}} + \glyph{quoteright}{1000} + \samesize{quotesinglbase} +\endsetglyph + +\resetglyph{quotedblbase} + \moveup{\sub{\height{quotedblbase}}{\height{quotedblright}}} + \movert{-45} + \glyph{quotedblright}{1000} + \movert{70} + \resetheight{\height{quotedblbase}} + \resetdepth{\depth{quotedblbase}} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Correcting character boxes} +% +% I don't know why, but the original character boxes of Haralambous for +% yswab are sometimes wrong. +% \begin{macrocode} +\resetglyph{ffi} + \glyph{ffi}{1000} + \resetheight{\height{h}} + \resetdepth{\depth{h}} +\endsetglyph + +\resetglyph{ffl} + \glyph{ffl}{1000} + \resetheight{\height{k}} +\endsetglyph + +\resetglyph{comma} + \glyph{comma}{1000} + \resetheight{\height{quotesinglbase}} + \resetdepth{\depth{quotesinglbase}} +\endsetglyph + +\resetglyph{period} + \glyph{period}{1000} + \resetheight{\height{quotesinglbase}} +\endsetglyph + +\resetglyph{m} + \glyph{m}{1000} + \resetheight{\height{u}} +\endsetglyph + +\resetglyph{n} + \glyph{n}{1000} + \resetheight{\height{u}} +\endsetglyph + +\resetint{interword}{250} + +% \end{macrocode} +% +% \subsection{Faking the glyphs} +% +% The following glyphs should be constructed in |blackletter.mtx|. +% \begin{macrocode} +\unsetglyph{dotlessj} +\unsetglyph{fi} +\unsetglyph{fl} +\unsetglyph{backslash} +\unsetglyph{bar} + +% \end{macrocode} +% Now I try to fake or improve the letters for the latin T1 version of ygoth. +% Most of this should be easy to understand. +% \begin{macrocode} +\setglyph{Abreve} + \topaccent{A}{breve}{\Askew} +\endsetglyph + +\setglyph{Lcaron} + \glyph{L}{1000} + \movert{-200} + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{Lslash} + \glyph{lslashslash}{1000} + \movert{-270} + \glyph{L}{1000} +\endsetglyph + +\setglyph{Ng} + \glyph{S}{1000} +\endsetglyph + +\setglyph{dbar} + \push + \movert{-160} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{470}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{d}{1000} + \samesize{d} +\endsetglyph + +\setglyph{lslash} + \glyph{lslashslash}{1000} + \movert{-240} + \glyph{l}{1000} +\endsetglyph + +\setglyph{ng} + \glyph{sround}{1000} +\endsetglyph + +\setglyph{sacute} + \topaccent{sround}{acute}{500} +\endsetglyph + +\setglyph{scaron} + \topaccent{sround}{caron}{500} +\endsetglyph + +\setglyph{scedilla} + \botaccent{sround}{cedilla}{500} +\endsetglyph + +\setglyph{Agrave} + \topaccent{A}{grave}{\Askew} +\endsetglyph + +\setglyph{Aacute} + \topaccent{A}{acute}{\Askew} +\endsetglyph + +\setglyph{Acircumflex} + \topaccent{A}{circumflex}{\Askew} +\endsetglyph + +\setglyph{Atilde} + \topaccent{A}{tilde}{\Askew} +\endsetglyph + +\setglyph{Adieresis} + \topaccent{A}{dieresis}{\Askew} +\endsetglyph + +\setglyph{Aring} + \topaccent{A}{ring}{\Askew} +\endsetglyph + +\setglyph{AE} + \glyph{A}{1000} + \movert{-100} + \glyph{E}{1000} +\endsetglyph + +\setglyph{Eth} + \push + \movert{100} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{300}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{D}{1000} + \resetdepth{\depth{D}} +\endsetglyph + +\setglyph{OE} + \glyph{O}{1000} + \movert{-100} + \glyph{E}{1000} +\endsetglyph + +\setglyph{Oslash} + \push + \moveup{130} + \movert{170} + \glyph{slash}{800} + \pop + \glyph{O}{1000} +\endsetglyph + +\setglyph{Thorn} + \glyph{T}{1000} + \movert{-100} + \glyph{h}{1000} +\endsetglyph + +\setglyph{ae} + \glyph{a}{1000} + \movert{-150} + \glyph{e}{1000} +\endsetglyph + +\setglyph{eth} + \push + \movert{-30} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{650}} + {\height{macron}}} + \glyph{lslashslash}{1000} + \pop + \glyph{d}{1000} +\endsetglyph + +\setglyph{oslash} + \push + \moveup{120} + \movert{70} + \glyph{slash}{500} + \pop + \glyph{o}{1000} +\endsetglyph + +\setglyph{oe} + \glyph{o}{1000} + \movert{-100} + \glyph{e}{1000} +\endsetglyph + +\setglyph{thorn} + \glyph{t}{1000} + \movert{-80} + \glyph{h}{1000} +\endsetglyph + +\endmetrics +%</scleanupmtx> +% \end{macrocode} +% +% +% \section{Final touches to ygoth} +% +% \begin{macrocode} +%<*gcleanupmtx> +\relax + +\metrics + +% \end{macrocode} +% +% \subsection{Accent positioning} +% +% A top accent is set by placing the center of the accent at the given +% position along the width of the letter, raised up by the difference +% between the height of the letter and the xheight. +% \begin{macrocode} +\setcommand\topaccent#1#2#3{ + \push + \moveup{\max{0}{\sub{\height{#1}}{\int{xheight}}}} + \movert{\add{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + {\scale{\sub{\height{#1}}{\int{xheight}}}{\int{italicslant}}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% A bottom accent is set by placing the center of the accent at the given +% position along the width of the letter. +% \begin{macrocode} +\setcommand\botaccent#1#2#3{ + \push + \movert{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% The following values are for the |#3| paramter in the above macros. +% \begin{macrocode} +\setcommand\Askew{700} +\setcommand\Uskew{600} + +% \end{macrocode} +% |\adjustheight| is meant for characters with a too small height, which is +% true for all German umlauts, for example. +% \begin{macrocode} +\setcommand\adjustheight#1{% +\resetglyph{#1} + \glyph{#1}{1000} + \resetheight{\height{k}} +\endsetglyph +} + +\adjustheight{adieresis} +\adjustheight{edieresis} +\adjustheight{odieresis} +\adjustheight{udieresis} + +% \end{macrocode} +% +% \subsection{Setting up the accents} +% +% Here I make all accents a little bit smaller to fit with ygoth. +% Additionally I push them upwards, which is accent dependent. +% \begin{macrocode} +\setcommand\SmallerAccent#1#2{ +\resetglyph{#1} + \moveup{\add{100}{#2}} + \movert{\div{\width{#1}}{10}} + \glyph{#1}{800} + \samesize{#1} +\endsetglyph +} + +\SmallerAccent{grave}{20} +\SmallerAccent{acute}{20} +\SmallerAccent{circumflex}{20} +\SmallerAccent{tilde}{0} +\SmallerAccent{hungarumlaut}{20} +\SmallerAccent{ring}{30} +\SmallerAccent{ringfitted}{20} +\SmallerAccent{caron}{20} +\SmallerAccent{breve}{20} + +% \end{macrocode} +% I construct the dieresis of two mere periods. Don't say anything. +% \begin{macrocode} +\resetglyph{dieresis} + \moveup{560} + \movert{80} + \glyph{period}{1000} + \movert{-140} + \glyph{period}{1000} + \samesize{dieresis} +\endsetglyph + +% \end{macrocode} +% Similar trick for the dot accent. +% \begin{macrocode} +\resetglyph{dotaccent} + \moveup{560} + \movert{10} + \glyph{period}{1000} + \samesize{dotaccent} +\endsetglyph + +\resetglyph{ring} + \moveup{-30} + \glyph{ringfitted}{1000} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Setting up the quotes} +% +% What follows, are hopeless tricks to get nice double and single quotes. I +% move the glyphes arbitrarily around, in order to get nice spacing to +% following or preceding letters and to avaiod EC characters here. +% \begin{macrocode} +\resetglyph{quotesinglbase} + \moveup{\sub{\height{quotedblbase}}{\height{quoteright}}} + \glyph{quoteright}{1000} + \samesize{quotesinglbase} +\endsetglyph + +\resetglyph{quotedblleft} + \movert{-90} + \glyph{quotedblleft}{1000} + \resetwidth{\sub{\width{quotedblleft}}{100}} +\endsetglyph + +\resetglyph{quotedblright} + \movert{20} + \glyph{quotedblright}{1000} + \resetwidth{\sub{\width{quotedblright}}{120}} +\endsetglyph + +\resetglyph{quotedblbase} + \moveup{\sub{\height{quotedblbase}}{\height{quotedblright}}} + \movert{-80} + \glyph{quotedblright}{1000} + \resetheight{\height{quotedblbase}} + \resetdepth{\depth{quotedblbase}} + \resetwidth{\add{\width{quotedblbase}}{30}} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Correcting character boxes} +% +% I don't know why, but the original character boxes of Haralambous for +% ygoth are sometimes wrong. Here I shift the ``i'' a little bit to the +% left and the ``l'' a little bit to the right. Similar changes to other +% characters. +% \begin{macrocode} +\resetglyph{dotlessi} + \movert{-30} + \glyph{dotlessi}{1000} + \resetwidth{\width{dotlessi}} + \resetheight{\height{u}} +\endsetglyph + +\resetglyph{fi} + \glyph{fi}{1000} + \movert{40} +\endsetglyph + +\resetglyph{ffi} + \glyph{ffi}{1000} + \movert{20} + \resetdepth{\depth{h}} +\endsetglyph + +\resetglyph{ffl} + \glyph{ffl}{1000} + \movert{20} +\endsetglyph + +\resetglyph{comma} + \glyph{comma}{1000} + \resetheight{\height{quotesinglbase}} +\endsetglyph + +\resetglyph{period} + \glyph{period}{1000} + \resetheight{\height{quotesinglbase}} +\endsetglyph + +\resetglyph{A} + \glyph{A}{1000} + \resetheight{\sub{\height{A}}{50}} +\endsetglyph + +\resetglyph{i} + \movert{-30} + \glyph{i}{1000} + \samesize{i} +\endsetglyph + +\resetglyph{j} + \movert{-30} + \glyph{j}{1000} + \movert{30} +\endsetglyph + +\resetglyph{l} + \movert{30} + \glyph{l}{1000} + \samesize{l} +\endsetglyph + +\resetint{interword}{250} + +% \end{macrocode} +% +% \subsection{Kerning} +% +% ``F'' and ``V'' need some kerning. +% +% \begin{macrocode} +\setkern{F}{a}{-140} +\setkern{F}{e}{-110} +\setkern{F}{o}{-140} +\setkern{F}{u}{-110} + +\setkern{V}{a}{-140} +\setkern{V}{e}{-110} +\setkern{V}{o}{-140} +\setkern{V}{u}{-110} + + +% \end{macrocode} +% +% \subsection{Faking the glyphs} +% +% The following glyphs should be constructed in |blackletter.mtx|. +% \begin{macrocode} +\unsetglyph{dotlessj} +\unsetglyph{backslash} + +% \end{macrocode} +% Now I try to fake or improve the letters for the latin T1 version of ygoth. +% Most of this should be easy to understand. +% \begin{macrocode} +\setglyph{Abreve} + \topaccent{A}{breve}{\Askew} +\endsetglyph + +\setglyph{Eogonek} + \botaccent{E}{ogonek}{600} +\endsetglyph + +\setglyph{Lacute} + \topaccent{L}{acute}{700} +\endsetglyph + +\setglyph{Lcaron} + \glyph{L}{1000} + \movert{-30} + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{Lslash} + \moveup{-200} + \glyph{lslashslash}{1800} + \moveup{200} + \movert{-640} + \glyph{L}{1000} + \samesize{L} +\endsetglyph + +\setglyph{Ng} + \glyph{S}{1000} +\endsetglyph + +\setglyph{Uhungarumlaut} + \topaccent{U}{hungarumlaut}{\Uskew} +\endsetglyph + +\setglyph{Uring} + \topaccent{U}{ring}{\Uskew} +\endsetglyph + +\setglyph{dbar} + \push + \movert{-100} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{390}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{d}{1000} + \samesize{d} +\endsetglyph + +\setglyph{lcaron} + \glyph{l}{1000} + \movert{-50} + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{lslash} + \glyph{lslashslash}{1000} + \movert{-220} + \glyph{l}{1000} +\endsetglyph + +\setglyph{ng} + \glyph{sround}{1000} +\endsetglyph + +\setglyph{sacute} + \topaccent{sround}{acute}{500} +\endsetglyph + +\setglyph{scaron} + \topaccent{sround}{caron}{500} +\endsetglyph + +\setglyph{scedilla} + \botaccent{sround}{cedilla}{500} +\endsetglyph + +\setglyph{Agrave} + \topaccent{A}{grave}{\Askew} +\endsetglyph + +\setglyph{Aacute} + \topaccent{A}{acute}{\Askew} +\endsetglyph + +\setglyph{Acircumflex} + \topaccent{A}{circumflex}{\Askew} +\endsetglyph + +\setglyph{Atilde} + \topaccent{A}{tilde}{\Askew} +\endsetglyph + +\setglyph{Adieresis} + \topaccent{A}{dieresis}{\Askew} +\endsetglyph + +\setglyph{Aring} + \topaccent{A}{ring}{\Askew} +\endsetglyph + +\setglyph{AE} + \glyph{A}{1000} + \movert{-190} + \glyph{E}{1000} +\endsetglyph + +\setglyph{Eth} + \push + \movert{-80} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{380}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{D}{1000} + \resetdepth{\depth{D}} +\endsetglyph + +\setglyph{OE} + \glyph{O}{1000} + \movert{-100} + \glyph{E}{1000} +\endsetglyph + +\setglyph{Oslash} + \push + \moveup{130} + \movert{190} + \glyph{slash}{800} + \pop + \glyph{O}{1000} +\endsetglyph + +\setglyph{Ugrave} + \topaccent{U}{grave}{\Uskew} +\endsetglyph + +\setglyph{Uacute} + \topaccent{U}{acute}{\Uskew} +\endsetglyph + +\setglyph{Ucircumflex} + \topaccent{U}{circumflex}{\Uskew} +\endsetglyph + +\setglyph{Udieresis} + \topaccent{U}{dieresis}{\Uskew} +\endsetglyph + +\setglyph{Thorn} + \glyph{T}{1000} + \movert{-100} + \glyph{h}{1000} +\endsetglyph + +\setglyph{ae} + \glyph{a}{1000} + \movert{-150} + \glyph{e}{1000} +\endsetglyph + +\setglyph{eth} + \push + \movert{-40} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{620}} + {\height{macron}}} + \glyph{lslashslash}{1000} + \pop + \glyph{d}{1000} +\endsetglyph + +\setglyph{oslash} + \push + \moveup{120} + \movert{70} + \glyph{slash}{500} + \pop + \glyph{o}{1000} +\endsetglyph + +\setglyph{oe} + \glyph{o}{1000} + \movert{-100} + \glyph{e}{1000} +\endsetglyph + +\setglyph{thorn} + \glyph{t}{1000} + \movert{-80} + \glyph{h}{1000} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Letterspacing} +% +% ygoth runs too narrow. I improve that here. +% \begin{macrocode} +\setint{letterspacing}{50} + +% \end{macrocode} +% On the other hand, the German combination ``sch'' looks like ``s\,ch''. +% Therefore I set this kerning here. FixMe: This induces wrong implicit +% kerning of diacritic letters in |blackletter.mtx|. +% \begin{macrocode} +\setkern{s}{c}{-80} + +\endmetrics +%</gcleanupmtx> +% \end{macrocode} +% +% +% \section{Letterspacing} +% +% The following definitions form the file |lettersp.mtx| and define some +% thing for a letterspeced Fraktur version, used eventually as the italic +% counterpart. +% \begin{macrocode} +%<*letterspmtx> +\relax + +\metrics + +% \end{macrocode} +% +% \subsection{The ``sch'' case} +% +% First, I re-do the spacing for the ``sch'' combination. This is unusual, +% but I find it more readable this way. +% +% This is now turned off. +% \begin{macrocode} +\iffalse +\setkern{s}{c}{-150} +\fi + +% \end{macrocode} +% The following definitions turn off all kerning commands. This prevents +% |blackletter.mtx| from copying the above kerning information to other +% \mbox{``s--c''} combinations with diacritic marks. +% \begin{macrocode} +\gdef\setleftrightkerning#1#2#3{} +\gdef\setleftkerning#1#2#3{} +\gdef\setrightkerning#1#2#3{} + +% \end{macrocode} +% Now I finally set the letterspacing. +% \begin{macrocode} +\setint{letterspacing}{150} + +\resetint{interword}{350} + +% \end{macrocode} +% +% \subsection{Breaking up of some ligatures} +% +% In the rest of the file I re-define some ligatures, namely all ligatures +% that have to be blackletter up in letterspacing. Actually the ``st'' ligature +% should be blackletter up, too, according to Duden and other sources. Curiously +% enough, I've found no real life book that did it that way, everybody keeps +% it together. So I do that, too. After all, it's a very nice ligature. +% \begin{macrocode} +\resetglyph{dotlessj} + \glyph{s}{1000} + \movert{\int{letterspacing}} + \glyph{i}{1000} +\endsetglyph + +\resetglyph{ff} + \glyph{f}{1000} + \movert{\int{letterspacing}} + \glyph{f}{1000} +\endsetglyph + +\resetglyph{fi} + \glyph{f}{1000} + \movert{\int{letterspacing}} + \glyph{i}{1000} +\endsetglyph + +\resetglyph{fl} + \glyph{f}{1000} + \movert{\int{letterspacing}} + \glyph{l}{1000} +\endsetglyph + +\resetglyph{backslash} + \glyph{f}{1000} + \movert{\int{letterspacing}} + \glyph{t}{1000} +\endsetglyph + +\resetglyph{asciicircum} + \glyph{s}{1000} + \movert{\int{letterspacing}} + \glyph{s}{1000} +\endsetglyph + +\endmetrics +%</letterspmtx> +% \end{macrocode} +% The following file |blackletter.mtx| is a slimmed and modified version of +% \texttt{fontinst}'s |latin.mtx|. It makes last settings and tries to fake +% glyphs that are still missing. +% \begin{macrocode} +%<*blacklettermtx> +\relax + +\documentclass[twocolumn]{article} +\usepackage{fontdoc} + +\title{The blackletter typefaces glyphs} +\author{Torsten Bronger} +\date{7.~May 2002 \\ +Version 1.0} + +\begin{document} +\maketitle + +\section{Introduction} + +This document describes the glyphs used by the {\tt fontinst} package when +generating blackletter typefaces fonts, especially those by Yannis Haralambous. +It's a modified version of {\tt fontinst}'s \verb|latin.mtx|. + +\metrics + +\needsfontinstversion{1.801} + +% \end{macrocode} +% +% \subsection{Basic helper commands} +% +% |\unfakable| is a glyph which can't be faked. +% \begin{macrocode} +\setcommand\unfakable#1{ + \setglyph{#1} + \ifisglyph{#1-not}\then + \moveup{\neg{\depth{#1-not}}} + \glyphrule{ + \width{#1-not} + }{ + \add{\depth{#1-not}}{\height{#1-not}} + } + \resetitalic{\italic{#1-not}} + \moveup{\depth{#1-not}} + \else + \glyphrule{500}{500} + \fi + \glyphwarning{missing glyph `#1'} + \endsetglyph +} + +% \end{macrocode} +% A top accent is set by placing the center of the accent at the given +% position along the width of the letter, raised up by the difference +% between the height of the letter and the xheight. +% \begin{macrocode} +\setcommand\topaccent#1#2#3{ + \push + \moveup{\max{0}{\sub{\height{#1}}{\int{xheight}}}} + \movert{\add{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + {\scale{\sub{\height{#1}}{\int{xheight}}}{\int{italicslant}}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% A bottom accent is set by placing the center of the accent at the given +% position along the width of the letter. +% \begin{macrocode} +\setcommand\botaccent#1#2#3{ + \push + \movert{\sub{\scale{\width{#1}}{#3}}{\scale{\width{#2}}{500}}} + \glyph{#2}{1000} + \pop + \glyph{#1}{1000} +} + +% \end{macrocode} +% +% \subsection{Default font values} +% +% \begin{macrocode} +\comment{\section{Default values}} + +\setint{italicslant}{0} +\setint{xheight}{\height{x}} +\setint{capheight}{\height{A}} +\setint{ascender}{\height{k}} +\setint{descender}{\depth{g}} +\setint{underlinethickness}{40} +\setint{visiblespacedepth}{200} +\setint{visiblespacewidth}{400} +\setint{visiblespacesurround}{50} +\setint{smallcapsscale}{800} +\setint{smallcapskerning}{900} + +\setint{capspacing}{50} +\setint{smallcapsextraspace}{0} + +\setint{boundarychar}{32} + + +% \end{macrocode} +% +% \subsection{Kerning adjustments} +% +% \begin{macrocode} +\comment{\section{Kerning}} + +% \end{macrocode} +% The command |\typicalkerns| adds extra space before some punctuation. This +% is common in typesetting with blackletter typefaces. +% \begin{macrocode} +\setcommand\typicalkerns#1{ + \setkern{#1}{exclam}{100} + \setkern{#1}{question}{100} + \setkern{#1}{colon}{50} + \setkern{#1}{semicolon}{50} +} + +% \end{macrocode} +% Now we call |\typicalkerns| for all letter-like characters. +% \begin{macrocode} +\typicalkerns{dotlessj} +\typicalkerns{ff} +\typicalkerns{fi} +\typicalkerns{fl} +\typicalkerns{ffi} +\typicalkerns{ffl} + +\typicalkerns{zero} +\typicalkerns{one} +\typicalkerns{two} +\typicalkerns{three} +\typicalkerns{four} +\typicalkerns{five} +\typicalkerns{six} +\typicalkerns{seven} +\typicalkerns{eight} +\typicalkerns{nine} + +\typicalkerns{A} \typicalkerns{B} +\typicalkerns{C} \typicalkerns{D} \typicalkerns{E} \typicalkerns{F} +\typicalkerns{G} \typicalkerns{H} \typicalkerns{I} \typicalkerns{J} +\typicalkerns{K} \typicalkerns{L} \typicalkerns{M} \typicalkerns{N} +\typicalkerns{O} \typicalkerns{P} \typicalkerns{Q} \typicalkerns{R} +\typicalkerns{S} \typicalkerns{T} \typicalkerns{U} \typicalkerns{V} +\typicalkerns{W} \typicalkerns{X} \typicalkerns{Y} \typicalkerns{Z} + +\typicalkerns{a} \typicalkerns{b} +\typicalkerns{c} \typicalkerns{d} \typicalkerns{e} \typicalkerns{f} +\typicalkerns{g} \typicalkerns{h} \typicalkerns{i} \typicalkerns{j} +\typicalkerns{k} \typicalkerns{l} \typicalkerns{m} \typicalkerns{n} +\typicalkerns{o} \typicalkerns{p} \typicalkerns{q} \typicalkerns{r} +\typicalkerns{s} \typicalkerns{t} \typicalkerns{u} \typicalkerns{v} +\typicalkerns{w} \typicalkerns{x} \typicalkerns{y} \typicalkerns{z} + +\typicalkerns{backslash} +\typicalkerns{asciicircum} +\typicalkerns{underscore} +\typicalkerns{bar} + +\typicalkerns{quoteleft} +\typicalkerns{quoteright} +\typicalkerns{quotedblleft} +\typicalkerns{quotedblright} + +\typicalkerns{Abreve} +\typicalkerns{Aogonek} \typicalkerns{Cacute} \typicalkerns{Ccaron} +\typicalkerns{Dcaron} \typicalkerns{Ecaron} \typicalkerns{Eogonek} +\typicalkerns{Gbreve} \typicalkerns{Lacute} \typicalkerns{Lcaron} +\typicalkerns{Lslash} \typicalkerns{Nacute} \typicalkerns{Ncaron} +\typicalkerns{Ng} \typicalkerns{Ohungarumlaut} \typicalkerns{Racute} +\typicalkerns{Rcaron} \typicalkerns{Sacute} \typicalkerns{Scaron} +\typicalkerns{Scedilla} \typicalkerns{Tcaron} \typicalkerns{Tcedilla} +\typicalkerns{Uhungarumlaut} \typicalkerns{Uring} \typicalkerns{Ydieresis} +\typicalkerns{Zacute} \typicalkerns{Zcaron} \typicalkerns{Zdotaccent} +\typicalkerns{IJ} \typicalkerns{Idotaccent} \typicalkerns{dbar} + +\typicalkerns{section} + +\typicalkerns{abreve} \typicalkerns{aogonek} +\typicalkerns{cacute} \typicalkerns{ccaron} \typicalkerns{dcaron} +\typicalkerns{ecaron} \typicalkerns{eogonek} \typicalkerns{gbreve} +\typicalkerns{lacute} \typicalkerns{lcaron} \typicalkerns{lslash} +\typicalkerns{nacute} \typicalkerns{ncaron} \typicalkerns{ng} +\typicalkerns{ohungarumlaut} \typicalkerns{racute} \typicalkerns{rcaron} +\typicalkerns{sacute} \typicalkerns{scaron} \typicalkerns{scedilla} +\typicalkerns{tcaron} \typicalkerns{tcedilla} \typicalkerns{uhungarumlaut} +\typicalkerns{uring} \typicalkerns{ydieresis} \typicalkerns{zacute} +\typicalkerns{zcaron} \typicalkerns{zdotaccent} \typicalkerns{ij} + +%\typicalkerns{exclamdown} +%\typicalkerns{questiondown} +\typicalkerns{sterling} + +\typicalkerns{Agrave} +\typicalkerns{Aacute} \typicalkerns{Acircumflex} \typicalkerns{Atilde} +\typicalkerns{Adieresis} \typicalkerns{Aring} \typicalkerns{AE} +\typicalkerns{Ccedilla} \typicalkerns{Egrave} \typicalkerns{Eacute} +\typicalkerns{Ecircumflex} \typicalkerns{Edieresis} \typicalkerns{Igrave} +\typicalkerns{Iacute} \typicalkerns{Icircumflex} \typicalkerns{Idieresis} +\typicalkerns{Eth} \typicalkerns{Ntilde} \typicalkerns{Ograve} +\typicalkerns{Oacute} \typicalkerns{Ocircumflex} \typicalkerns{Otilde} +\typicalkerns{Odieresis} \typicalkerns{OE} \typicalkerns{Oslash} +\typicalkerns{Ugrave} \typicalkerns{Uacute} \typicalkerns{Ucircumflex} +\typicalkerns{Udieresis} \typicalkerns{Yacute} \typicalkerns{Thorn} +\typicalkerns{SS} \typicalkerns{agrave} \typicalkerns{aacute} +\typicalkerns{acircumflex} \typicalkerns{atilde} \typicalkerns{adieresis} +\typicalkerns{aring} \typicalkerns{ae} \typicalkerns{ccedilla} +\typicalkerns{egrave} \typicalkerns{eacute} \typicalkerns{ecircumflex} +\typicalkerns{edieresis} \typicalkerns{igrave} \typicalkerns{iacute} +\typicalkerns{icircumflex} \typicalkerns{idieresis} \typicalkerns{eth} +\typicalkerns{ntilde} \typicalkerns{ograve} \typicalkerns{oacute} +\typicalkerns{ocircumflex} \typicalkerns{otilde} \typicalkerns{odieresis} +\typicalkerns{oe} \typicalkerns{oslash} \typicalkerns{ugrave} +\typicalkerns{uacute} \typicalkerns{ucircumflex} \typicalkerns{udieresis} +\typicalkerns{yacute} \typicalkerns{thorn} \typicalkerns{germandbls} + +% \end{macrocode} +% Here we set the kernings of the new ligature characters. +% \begin{macrocode} +\setleftkerning{dotlessj}{s}{1000} +\setrightkerning{dotlessj}{i}{1000} + +\setleftkerning{backslash}{f}{1000} +\setrightkerning{backslash}{t}{1000} + +\setleftkerning{asciicircum}{s}{1000} +\setrightkerning{asciicircum}{s}{1000} + +\setleftkerning{underscore}{s}{1000} +\setrightkerning{unserscore}{t}{1000} + +\setleftkerning{bar}{t}{1000} +\setrightkerning{bar}{z}{1000} + + +% \end{macrocode} +% The following adjustments are again taken from |latin.mtx|. +% \begin{macrocode} +\setleftrightkerning{visiblespace}{space}{1000} + +\setleftkerning{hyphenchar}{hyphen}{1000} + +\setleftrightkerning{Aacute}{A}{1000} +\setleftrightkerning{Abreve}{A}{1000} +\setleftrightkerning{Acircumflex}{A}{1000} +\setleftrightkerning{Adieresis}{A}{1000} +\setleftrightkerning{Agrave}{A}{1000} +\setleftrightkerning{Aogonek}{A}{1000} +\setleftrightkerning{Aring}{A}{1000} +\setleftrightkerning{Atilde}{A}{1000} + +\setleftrightkerning{Cacute}{C}{1000} +\setleftrightkerning{Ccaron}{C}{1000} +\setleftrightkerning{Ccedilla}{C}{1000} + +\setleftrightkerning{Dcaron}{D}{1000} + +\setleftrightkerning{Eacute}{E}{1000} +\setleftrightkerning{Ecaron}{E}{1000} +\setleftrightkerning{Ecircumflex}{E}{1000} +\setleftrightkerning{Edieresis}{E}{1000} +\setleftrightkerning{Egrave}{E}{1000} +\setleftrightkerning{Eogonek}{E}{1000} + +\setleftrightkerning{Gbreve}{G}{1000} + +\setleftkerning{IJ}{I}{1000} + +\setleftrightkerning{Iacute}{I}{1000} +\setleftrightkerning{Icircumflex}{I}{1000} +\setleftrightkerning{Idieresis}{I}{1000} +\setleftrightkerning{Idotaccent}{I}{1000} +\setleftrightkerning{Igrave}{I}{1000} + +\setrightkerning{IJ}{J}{1000} + +\setleftrightkerning{Lacute}{L}{1000} +\setleftrightkerning{Lslash}{L}{1000} +\setleftkerning{Lcaron}{L}{1000} + +\setleftrightkerning{Nacute}{N}{1000} +\setleftrightkerning{Ncaron}{N}{1000} +\setleftrightkerning{Ntilde}{N}{1000} + +\setleftrightkerning{Oacute}{O}{1000} +\setleftrightkerning{Ocircumflex}{O}{1000} +\setleftrightkerning{Odieresis}{O}{1000} +\setleftrightkerning{Ograve}{O}{1000} +\setleftrightkerning{Ohungarumlaut}{O}{1000} +\setleftrightkerning{Oslash}{O}{1000} +\setleftrightkerning{Otilde}{O}{1000} + +\setleftrightkerning{Rcaron}{R}{1000} +\setleftrightkerning{Racute}{R}{1000} + +\setleftrightkerning{SS}{S}{1000} +\setleftrightkerning{Sacute}{S}{1000} +\setleftrightkerning{Scaron}{S}{1000} +\setleftrightkerning{Scedilla}{S}{1000} + +\setleftrightkerning{Tcaron}{T}{1000} +\setleftrightkerning{Tcedilla}{T}{1000} + +\setleftrightkerning{Uacute}{U}{1000} +\setleftrightkerning{Ucircumflex}{U}{1000} +\setleftrightkerning{Udieresis}{U}{1000} +\setleftrightkerning{Ugrave}{U}{1000} +\setleftrightkerning{Uhungarumlaut}{U}{1000} +\setleftrightkerning{Uring}{U}{1000} + +\setleftrightkerning{Yacute}{Y}{1000} +\setleftrightkerning{Ydieresis}{Y}{1000} + +\setleftrightkerning{Zacute}{Z}{1000} +\setleftrightkerning{Zcaron}{Z}{1000} +\setleftrightkerning{Zdotaccent}{Z}{1000} + +\setleftrightkerning{aogonek}{a}{1000} + +\setleftrightkerning{ccedilla}{c}{1000} + +\setleftrightkerning{eogonek}{e}{1000} + +% \end{macrocode} +% The following four lines are of course different from |latin.mtx|, because +% these positions contain different ligatures here. ``ffi'' is ``ch'', and +% ``ffl'' is ``ck''. +% \begin{macrocode} +\setleftkerning{ffi}{c}{1000} +\setleftkerning{ffl}{c}{1000} +\setrightkerning{ffi}{h}{1000} +\setrightkerning{ffl}{k}{1000} + +\setleftrightkerning{ff}{f}{1000} +\setleftkerning{fi}{f}{1000} +\setleftkerning{fl}{f}{1000} + +\setleftkerning{ij}{i}{1000} + +\setrightkerning{fi}{i}{1000} + +\setrightkerning{ij}{j}{1000} + +\setrightkerning{fl}{l}{1000} + +\setleftkerning{oe}{o}{1000} +\setrightkerning{oe}{e}{1000} +\setleftrightkerning{oslash}{o}{1000} + +\setleftrightkerning{scedilla}{s}{1000} + +\setleftrightkerning{tcedilla}{t}{1000} + +% \end{macrocode} +% +% \subsection{Faking of glyphs} +% +% \subsubsection{List of unfakable glyphs} +% +% At first, a list of all glyphs that can't be faked. This list is shorter +% than in |latin.mtx|, because I'm naughty enough to fake more. +% \begin{macrocode} +\comment{\section{Unfakable glyphs}} + +\unfakable{Gamma} +\unfakable{Delta} +\unfakable{Theta} +\unfakable{Lambda} +\unfakable{Xi} +\unfakable{Pi} +\unfakable{Sigma} +\unfakable{Upsilon} +\unfakable{Upsilon1} +\unfakable{Phi} +\unfakable{Psi} +\unfakable{Omega} + +\unfakable{grave} +\unfakable{acute} +\unfakable{circumflex} +\unfakable{tilde} +\unfakable{dieresis} +\unfakable{hungarumlaut} +\unfakable{ring} +\unfakable{caron} +\unfakable{breve} +\unfakable{macron} +\unfakable{dotaccent} +\unfakable{cedilla} +\unfakable{ogonek} +\unfakable{guilsinglleft} +\unfakable{guilsinglright} +\unfakable{quotedblleft} +\unfakable{quotedblright} +\unfakable{quotedblbase} +\unfakable{guillemotleft} +\unfakable{guillemotright} +\unfakable{endash} +\unfakable{emdash} +\unfakable{dotlessi} +\unfakable{perthousandzero} +\unfakable{exclam} +\unfakable{quotedbl} +\unfakable{numbersign} +\unfakable{dollar} +\unfakable{percent} +\unfakable{ampersand} +\unfakable{quoteright} +\unfakable{parenleft} +\unfakable{parenright} +\unfakable{asterisk} +\unfakable{plus} +\unfakable{comma} +\unfakable{hyphen} +\unfakable{period} +\unfakable{slash} +\unfakable{zero} +\unfakable{one} +\unfakable{two} +\unfakable{three} +\unfakable{four} +\unfakable{five} +\unfakable{six} +\unfakable{seven} +\unfakable{eight} +\unfakable{nine} +\unfakable{zerooldstyle} +\unfakable{oneoldstyle} +\unfakable{twooldstyle} +\unfakable{threeoldstyle} +\unfakable{fouroldstyle} +\unfakable{fiveoldstyle} +\unfakable{sixoldstyle} +\unfakable{sevenoldstyle} +\unfakable{eightoldstyle} +\unfakable{nineoldstyle} +\unfakable{colon} +\unfakable{semicolon} +\unfakable{less} +\unfakable{equal} +\unfakable{greater} +\unfakable{question} +\unfakable{at} +\unfakable{A} +\unfakable{B} +\unfakable{C} +\unfakable{D} +\unfakable{E} +\unfakable{F} +\unfakable{G} +\unfakable{H} +\unfakable{I} +\unfakable{J} +\unfakable{K} +\unfakable{L} +\unfakable{M} +\unfakable{N} +\unfakable{O} +\unfakable{P} +\unfakable{Q} +\unfakable{R} +\unfakable{S} +\unfakable{T} +\unfakable{U} +\unfakable{V} +\unfakable{W} +\unfakable{X} +\unfakable{Y} +\unfakable{Z} +\unfakable{bracketleft} +\unfakable{bracketright} +\unfakable{quoteleft} +\unfakable{a} +\unfakable{b} +\unfakable{c} +\unfakable{d} +\unfakable{e} +\unfakable{f} +\unfakable{g} +\unfakable{h} +\unfakable{i} +\unfakable{j} +\unfakable{k} +\unfakable{l} +\unfakable{m} +\unfakable{n} +\unfakable{o} +\unfakable{p} +\unfakable{q} +\unfakable{r} +\unfakable{s} +\unfakable{t} +\unfakable{u} +\unfakable{v} +\unfakable{w} +\unfakable{x} +\unfakable{y} +\unfakable{z} +\unfakable{braceleft} +\unfakable{braceright} +\unfakable{asciitilde} +\unfakable{Eng} +\unfakable{section} +\unfakable{eng} +\unfakable{exclamdown} +\unfakable{questiondown} +\unfakable{sterling} +\unfakable{AE} +\unfakable{Eth} +\unfakable{OE} +\unfakable{Oslash} +\unfakable{Thorn} +\unfakable{ae} +\unfakable{eth} +\unfakable{oe} +\unfakable{oslash} +\unfakable{thorn} +\unfakable{germandbls} +\unfakable{lslashslash} + +% \end{macrocode} +% +% \subsubsection{Glyph construction} +% +% Most of this here is taken from |latin.mtx|. +% \begin{macrocode} +\comment{\section{Glyphs}} + +\setglyph{space} + \ifisglyph{space-not}\then + \movert{\width{space-not}} + \else + \movert{\width{i}} + \fi +\endsetglyph + +\setglyph{compwordmark} + \glyphrule{0}{\int{xheight}} +\endsetglyph +\setint{compwordmark-spacing}{0} + +\setglyph{quotesinglbase} + \glyph{comma}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the dotless ``j'', we actually have the ``si'' ligature. +% \begin{macrocode} +\setglyph{dotlessj} + \glyph{s}{1000} + \glyph{i}{1000} +\endsetglyph + +\setglyph{fi} + \glyph{f}{1000} + \movert{\kerning{f}{i}} + \glyph{i}{1000} +\endsetglyph + +\setglyph{ff} + \glyph{f}{1000} + \movert{\kerning{f}{f}} + \glyph{f}{1000} +\endsetglyph + +\setglyph{fl} + \glyph{f}{1000} + \movert{\kerning{f}{l}} + \glyph{l}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the ``ffi'' ligature, we actually have the ``ch'' ligature. +% \begin{macrocode} +\setglyph{ffi} + \glyph{c}{1000} + \movert{\kerning{c}{h}} + \glyph{h}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the ``ffl'' ligature, we actually have the ``ck'' ligature. +% \begin{macrocode} +\setglyph{ffl} + \glyph{c}{1000} + \movert{\kerning{c}{k}} + \glyph{k}{1000} +\endsetglyph + +\setglyph{visiblespace} + \moveup{\neg{\int{visiblespacedepth}}} + \movert{\int{visiblespacesurround}} + \glyphrule + {\int{underlinethickness}} + {\int{visiblespacedepth}} + \glyphrule + {\int{visiblespacewidth}} + {\int{underlinethickness}} + \glyphrule + {\int{underlinethickness}} + {\int{visiblespacedepth}} + \movert{\int{visiblespacesurround}} + \moveup{\int{visiblespacedepth}} +\endsetglyph + +\setglyph{rangedash} + \ifisint{monowidth}\then + \glyph{hyphen}{1000} + \else + \glyph{endash}{1000} + \fi +\endsetglyph + +\setglyph{punctdash} + \ifisint{monowidth}\then + \glyph{hyphen}{1000} + \glyph{hyphen}{1000} + \else + \glyph{emdash}{1000} + \fi +\endsetglyph + +% \end{macrocode} +% In the slot of the backslash, we actually have the ``ft'' ligature. This +% ligature is not available in Haralambous' fonts, but it's a common Fraktur +% ligature and other font that you may get will probably have it. +% \begin{macrocode} +\setglyph{backslash} + \glyph{f}{1000} + \glyph{t}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the ascii circumflex, we actually have the ``ss'' ligature. +% \begin{macrocode} +\setglyph{asciicircum} + \glyph{s}{1000} + \glyph{s}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the underscore, we actually have the ``st'' ligature. +% \begin{macrocode} +\setglyph{underscore} + \glyph{s}{1000} + \glyph{t}{1000} +\endsetglyph + +% \end{macrocode} +% In the slot of the vertical bar, we actually have the ``tz'' ligature. +% \begin{macrocode} +\setglyph{bar} + \glyph{t}{1000} + \glyph{z}{1000} +\endsetglyph + +% \end{macrocode} +% The hyphen character has width zero, which is different from |latin.mtx|. +% \begin{macrocode} +\setglyph{hyphenchar} + \glyph{hyphen}{1000} +% \resetwidth{0} +\endsetglyph + +\setglyph{ringfitted} + \movert{\div{\sub{\width{A}}{\width{ring}}}{2}} + \glyph{ring}{1000} + \movert{\div{\sub{\width{A}}{\width{ring}}}{2}} +\endsetglyph + +\setglyph{lslash} + \glyph{lslashslash}{1000} + \movert{\kerning{lslashslash}{l}} + \glyph{l}{1000} +\endsetglyph + +\setglyph{Lslash} + \glyph{lslashslash}{1000} + \movert{\kerning{lslashslash}{L}} + \glyph{L}{1000} +\endsetglyph + +\setglyph{Abreve} + \topaccent{A}{breve}{500} +\endsetglyph + +\setglyph{Aogonek} + \botaccent{A}{ogonek}{900} +\endsetglyph + +\setglyph{Cacute} + \topaccent{C}{acute}{500} +\endsetglyph + +\setglyph{Ccaron} + \topaccent{C}{caron}{500} +\endsetglyph + +\setglyph{Dcaron} + \topaccent{D}{caron}{450} +\endsetglyph + +\setglyph{Ecaron} + \topaccent{E}{caron}{500} +\endsetglyph + +\setglyph{Eogonek} + \botaccent{E}{ogonek}{850} +\endsetglyph + +\setglyph{Gbreve} + \topaccent{G}{breve}{500} +\endsetglyph + +\setglyph{Lacute} + \topaccent{L}{acute}{250} +\endsetglyph + +\setglyph{Lcaron} + \glyph{L}{1000} + \ifisint{monowidth}\then\else + \movert{-200} + \fi + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{Nacute} + \topaccent{N}{acute}{500} +\endsetglyph + +\setglyph{Ncaron} + \topaccent{N}{caron}{500} +\endsetglyph + +\setglyph{Ohungarumlaut} + \topaccent{O}{hungarumlaut}{500} +\endsetglyph + +\setglyph{Racute} + \topaccent{R}{acute}{500} +\endsetglyph + +\setglyph{Rcaron} + \topaccent{R}{caron}{500} +\endsetglyph + +\setglyph{Sacute} + \topaccent{S}{acute}{500} +\endsetglyph + +\setglyph{Scaron} + \topaccent{S}{caron}{500} +\endsetglyph + +\setglyph{Scedilla} + \botaccent{S}{cedilla}{500} +\endsetglyph + +\setglyph{Tcaron} + \topaccent{T}{caron}{500} +\endsetglyph + +\setglyph{Tcedilla} + \botaccent{T}{cedilla}{500} +\endsetglyph + +\setglyph{Uhungarumlaut} + \topaccent{U}{hungarumlaut}{500} +\endsetglyph + +\setglyph{Uring} + \topaccent{U}{ring}{500} +\endsetglyph + +\setglyph{Ydieresis} + \topaccent{Y}{dieresis}{500} +\endsetglyph + +\setglyph{Zacute} + \topaccent{Z}{acute}{500} +\endsetglyph + +\setglyph{Zcaron} + \topaccent{Z}{caron}{500} +\endsetglyph + +\setglyph{Zdotaccent} + \topaccent{Z}{dotaccent}{500} +\endsetglyph + +\setglyph{IJ} + \glyph{I}{1000} + \movert{\kerning{I}{J}} + \glyph{J}{1000} +\endsetglyph + +\setglyph{Idotaccent} + \topaccent{I}{dotaccent}{500} +\endsetglyph + +\setglyph{dbar} + \push + \movert{\sub{\width{d}}{\width{macron}}} + \moveup{ + \sub{\scale{\add{\height{d}}{\int{xheight}}}{500}} + {\height{macron}}} + \glyph{macron}{1000} + \pop + \glyph{d}{1000} +\endsetglyph + +\setglyph{abreve} + \topaccent{a}{breve}{500} +\endsetglyph + +\setglyph{aogonek} + \botaccent{a}{ogonek}{850} +\endsetglyph + +\setglyph{cacute} + \topaccent{c}{acute}{500} +\endsetglyph + +\setglyph{ccaron} + \topaccent{c}{caron}{500} +\endsetglyph + +\setglyph{dcaron} + \glyph{d}{1000} + \ifisint{monowidth}\then\else + \movert{-75} + \fi + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{ecaron} + \topaccent{e}{caron}{500} +\endsetglyph + +\setglyph{eogonek} + \botaccent{e}{ogonek}{500} +\endsetglyph + +\setglyph{gbreve} + \topaccent{g}{breve}{500} +\endsetglyph + +\setglyph{lacute} + \topaccent{l}{acute}{500} +\endsetglyph + +\setglyph{lcaron} + \glyph{l}{1000} + \ifisint{monowidth}\then\else + \movert{-100} + \fi + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{nacute} + \topaccent{n}{acute}{500} +\endsetglyph + +\setglyph{ncaron} + \topaccent{n}{caron}{500} +\endsetglyph + +\setglyph{ohungarumlaut} + \topaccent{o}{hungarumlaut}{500} +\endsetglyph + +\setglyph{racute} + \topaccent{r}{acute}{500} +\endsetglyph + +\setglyph{rcaron} + \topaccent{r}{caron}{500} +\endsetglyph + +\setglyph{sacute} + \topaccent{s}{acute}{500} +\endsetglyph + +\setglyph{scaron} + \topaccent{s}{caron}{500} +\endsetglyph + +\setglyph{scedilla} + \botaccent{s}{cedilla}{500} +\endsetglyph + +\setglyph{tcaron} + \glyph{t}{1000} + \ifisint{monowidth}\then\else + \movert{-75} + \fi + \glyph{quoteright}{1000} +\endsetglyph + +\setglyph{tcedilla} + \botaccent{t}{cedilla}{500} +\endsetglyph + +\setglyph{uhungarumlaut} + \topaccent{u}{hungarumlaut}{500} +\endsetglyph + +\setglyph{uring} + \topaccent{u}{ring}{500} +\endsetglyph + +\setglyph{ydieresis} + \topaccent{y}{dieresis}{500} +\endsetglyph + +\setglyph{zacute} + \topaccent{z}{acute}{500} +\endsetglyph + +\setglyph{zcaron} + \topaccent{z}{caron}{500} +\endsetglyph + +\setglyph{zdotaccent} + \topaccent{z}{dotaccent}{500} +\endsetglyph + +\setglyph{ij} + \glyph{i}{1000} + \movert{\kerning{i}{j}} + \glyph{j}{1000} +\endsetglyph + +\setglyph{Agrave} + \topaccent{A}{grave}{500} +\endsetglyph + +\setglyph{Aacute} + \topaccent{A}{acute}{500} +\endsetglyph + +\setglyph{Acircumflex} + \topaccent{A}{circumflex}{500} +\endsetglyph + +\setglyph{Atilde} + \topaccent{A}{tilde}{500} +\endsetglyph + +\setglyph{Adieresis} + \topaccent{A}{dieresis}{500} +\endsetglyph + +\setglyph{Aring} + \topaccent{A}{ring}{500} +\endsetglyph + +\setglyph{Ccedilla} + \botaccent{C}{cedilla}{500} +\endsetglyph + +\setglyph{Egrave} + \topaccent{E}{grave}{500} +\endsetglyph + +\setglyph{Eacute} + \topaccent{E}{acute}{500} +\endsetglyph + +\setglyph{Ecircumflex} + \topaccent{E}{circumflex}{500} +\endsetglyph + +\setglyph{Edieresis} + \topaccent{E}{dieresis}{500} +\endsetglyph + +\setglyph{Iacute} + \topaccent{I}{acute}{500} +\endsetglyph + +\setglyph{Igrave} + \topaccent{I}{grave}{500} +\endsetglyph + +\setglyph{Icircumflex} + \topaccent{I}{circumflex}{500} +\endsetglyph + +\setglyph{Idieresis} + \topaccent{I}{dieresis}{500} +\endsetglyph + +\setglyph{Ntilde} + \topaccent{N}{tilde}{500} +\endsetglyph + +\setglyph{Ograve} + \topaccent{O}{grave}{500} +\endsetglyph + +\setglyph{Oacute} + \topaccent{O}{acute}{500} +\endsetglyph + +\setglyph{Ocircumflex} + \topaccent{O}{circumflex}{500} +\endsetglyph + +\setglyph{Otilde} + \topaccent{O}{tilde}{500} +\endsetglyph + +\setglyph{Odieresis} + \topaccent{O}{dieresis}{500} +\endsetglyph + +\setglyph{Ugrave} + \topaccent{U}{grave}{500} +\endsetglyph + +\setglyph{Uacute} + \topaccent{U}{acute}{500} +\endsetglyph + +\setglyph{Ucircumflex} + \topaccent{U}{circumflex}{500} +\endsetglyph + +\setglyph{Udieresis} + \topaccent{U}{dieresis}{500} +\endsetglyph + +\setglyph{Yacute} + \topaccent{Y}{acute}{500} +\endsetglyph + +\setglyph{SS} + \glyph{S}{1000} + \movert{\kerning{S}{S}} + \glyph{S}{1000} +\endsetglyph + +\setglyph{agrave} + \topaccent{a}{grave}{500} +\endsetglyph + +\setglyph{aacute} + \topaccent{a}{acute}{500} +\endsetglyph + +\setglyph{acircumflex} + \topaccent{a}{circumflex}{500} +\endsetglyph + +\setglyph{atilde} + \topaccent{a}{tilde}{500} +\endsetglyph + +\setglyph{adieresis} + \topaccent{a}{dieresis}{500} +\endsetglyph + +\setglyph{aring} + \topaccent{a}{ring}{500} +\endsetglyph + +\setglyph{ccedilla} + \botaccent{c}{cedilla}{500} +\endsetglyph + +\setglyph{egrave} + \topaccent{e}{grave}{500} +\endsetglyph + +\setglyph{eacute} + \topaccent{e}{acute}{500} +\endsetglyph + +\setglyph{ecircumflex} + \topaccent{e}{circumflex}{500} +\endsetglyph + +\setglyph{edieresis} + \topaccent{e}{dieresis}{500} +\endsetglyph + +\setglyph{igrave} + \topaccent{dotlessi}{grave}{500} +\endsetglyph + +\setglyph{iacute} + \topaccent{dotlessi}{acute}{500} +\endsetglyph + +\setglyph{icircumflex} + \topaccent{dotlessi}{circumflex}{500} +\endsetglyph + +\setglyph{idieresis} + \topaccent{dotlessi}{dieresis}{500} +\endsetglyph + +\setglyph{ntilde} + \topaccent{n}{tilde}{500} +\endsetglyph + +\setglyph{ograve} + \topaccent{o}{grave}{500} +\endsetglyph + +\setglyph{oacute} + \topaccent{o}{acute}{500} +\endsetglyph + +\setglyph{ocircumflex} + \topaccent{o}{circumflex}{500} +\endsetglyph + +\setglyph{otilde} + \topaccent{o}{tilde}{500} +\endsetglyph + +\setglyph{odieresis} + \topaccent{o}{dieresis}{500} +\endsetglyph + +\setglyph{ugrave} + \topaccent{u}{grave}{500} +\endsetglyph + +\setglyph{uacute} + \topaccent{u}{acute}{500} +\endsetglyph + +\setglyph{ucircumflex} + \topaccent{u}{circumflex}{500} +\endsetglyph + +\setglyph{udieresis} + \topaccent{u}{dieresis}{500} +\endsetglyph + +\setglyph{yacute} + \topaccent{y}{acute}{500} +\endsetglyph + +% \end{macrocode} +% +% \subsection{Deleting depths from accents} +% +% \begin{macrocode} +\comment{\section{Accents} + \TeX's math accent-positioning requires accents to have zero depth.} + +\setcommand\zerodepth#1{ + \ifisglyph{#1}\then + \resetglyph{#1} + \glyph{#1}{1000} + \resetdepth{0} + \endresetglyph + \fi +} +\zerodepth{grave} +\zerodepth{acute} +\zerodepth{circumflex} +\zerodepth{tilde} +\zerodepth{dieresis} +\zerodepth{hungarumlaut} +\zerodepth{ring} +\zerodepth{caron} +\zerodepth{breve} +\zerodepth{macron} +\zerodepth{dotaccent} + +\endmetrics +\end{document} +%</blacklettermtx> +% \end{macrocode} +% +% +% \section{The blackletter typefaces encoding vector, a T1 variant} +% +% This file |t1frak.etx| is a simplification and modification of |t1.etx| of +% the \texttt{fontinst} package. It describes the output encoding vector of +% the blackletter typefaces. +% +% By and large, this is T1. Only some not so frequently used characters have +% been replaced with additional ligatures and the so called ``round~s''. +% +% However, the \emph{names} of the glyphs here are the same as in real T1. +% I wasn't brave enough to change them, but if it turns out that it's +% completely undangerous to use other name, I may change them. Both variants +% may cause confusion. +% +% The following substitutions are made from real T1: +% \begin{itemize} +% \item ``\j''~$\to$ ``si'' ligature +% \item ``ffi'' ligature~$\to$ ``ch'' ligature +% \item ``ffl''~$\to$ ``ck'' ligature +% \item ``$\backslash$''~$\to$ ``ft'' ligature +% \item ``$\hat{\ }$''~$\to$ ``ss'' ligature +% \item ``\underline{ }''~$\to$ ``st'' ligature +% \item ``$\vert$''~$\to$ ``tz'' ligature +% \item ``Eng''~$\to$ ``S'' +% \item ``eng''~$\to$ ``round~s'' +% \end{itemize} +% \begin{macrocode} +%<*t1fraketx> +\relax + +\documentclass[twocolumn]{article} +\usepackage[TS1,T1]{fontenc} +\usepackage{textcomp} +\usepackage{fontdoc} + +\title{The Fraktur encoding vector, a T1 variant} +\author{Torsten Bronger} +\date{29 May 2002 \\ +Version 1.0} + +\begin{document} + +\maketitle + +\section{Introduction} + +This document describes a modified Cork (T1) text encoding, modified +for the so called old German fonts. + +\newcommand*{\actually}[1]{ \emph{\bfseries Actually, here + in the Fraktur encoding, the #1}.} + +\encoding + +\needsfontinstversion{1.801} + +% \end{macrocode} +% +% \subsection{Default settings} +% +% \begin{macrocode} +\comment{\section{Default values}} + +\setstr{codingscheme}{EXTENDED TEX FONT ENCODING - LATIN} + +\setcommand\lc#1#2{#2} +\setcommand\uc#1#2{#1} +\setcommand\lctop#1#2{#2} +\setcommand\uctop#1#2{#1} +\setcommand\lclig#1#2{#2} +\setcommand\uclig#1#2{#1} +\setcommand\digit#1{#1} + +\setint{italicslant}{0} + +\ifisglyph{x}\then + \setint{xheight}{\height{x}} +\else + \setint{xheight}{500} +\fi + +\ifisglyph{space}\then + \setint{interword}{\width{space}} +\else\ifisglyph{i}\then + \setint{interword}{\width{i}} +\else + \setint{interword}{333} +\fi\fi + +% added by Thierry Bouche <Thierry.Bouche@ujf-grenoble.fr> +% 1997/02/07 to calculate values for extra EC fontdimens +% Amended by SPQR 1997/02/09 +\ifisglyph{X}\then + \setint{capheight}{\height{X}} +\else + \setint{capheight}{750} +\fi + +\ifisglyph{k}\then + \setint{ascender}{\height{k}} +\else + \ifisint{capheight}\then + \setint{ascender}{\int{capheight}} + \else + \setint{ascender}{750} +\fi\fi + +\ifisglyph{Aring}\then + \setint{acccapheight}{\height{Aring}} +\else + \setint{acccapheight}{999} +\fi + +\ifisint{descender_neg}\then + \setint{descender}{\neg{\int{descender_neg}}} + \else + \ifisglyph{p}\then + \setint{descender}{\depth{p}} + \else + \setint{descender}{250} + \fi +\fi + +\ifisglyph{Aring}\then + \setint{maxheight}{\height{Aring}} +\else + \setint{maxheight}{1000} +\fi + +\ifisint{maxdepth_neg}\then + \setint{maxdepth}{\neg{\int{maxdepth_neg}}} +\else + \ifisglyph{j}\then + \setint{maxdepth}{\depth{j}} + \else + \setint{maxdepth}{250} + \fi +\fi + +\ifisglyph{six}\then + \setint{digitwidth}{\width{six}} +\else + \setint{digitwidth}{500} +\fi + +\setint{capstem}{0} % not in AFM files +\setint{baselineskip}{1200} +% end changes by Thierry + + +\comment{\section{Default font dimensions}} + +\setint{fontdimen(1)}{\int{italicslant}} % italic slant +\setint{fontdimen(2)}{\int{interword}} % interword space +\ifisint{monowidth}\then + \setint{fontdimen(3)}{0} % interword stretch + \setint{fontdimen(4)}{0} % interword shrink +\else + \setint{fontdimen(3)}{\scale{\int{interword}}{600}}% interword stretch +% \end{macrocode} +% The following was changed from 240 to 150. +% \begin{macrocode} + \setint{fontdimen(4)}{\scale{\int{interword}}{150}}% interword shrink +\fi +\setint{fontdimen(5)}{\int{xheight}} % x-height +\setint{fontdimen(6)}{1000} % quad +\ifisint{monowidth}\then + \setint{fontdimen(7)}{\int{interword}} % extra space after . +\else +% \end{macrocode} +% The following was changed from 240 to 150. +% \begin{macrocode} + \setint{fontdimen(7)}{\scale{\int{interword}}{150}}% extra space after . +\fi +% added by Thierry Bouche <Thierry.Bouche@ujf-grenoble.fr> 1997/02/07 +\setint{fontdimen(8)}{\int{capheight}} % cap height +\setint{fontdimen(9)}{\int{ascender}} % ascender +\setint{fontdimen(10)}{\int{acccapheight}} % accented cap height +\setint{fontdimen(11)}{\int{descender}} % descender's depth +\setint{fontdimen(12)}{\int{maxheight}} % max height +\setint{fontdimen(13)}{\int{maxdepth}} % max depth +\setint{fontdimen(14)}{\int{digitwidth}} % digit width +\setint{fontdimen(15)}{\int{capstem}} % cap_stem +\setint{fontdimen(16)}{\int{baselineskip}} % baselineskip + +% \end{macrocode} +% +% \subsection{The encoding vector} +% +% \begin{macrocode} +\comment{\section{The encoding} + There are 256 glyphs in this encoding.} + +\setslot{\lc{Grave}{grave}} + \comment{The grave accent `\`{}'.} +\endsetslot + +\setslot{\lc{Acute}{acute}} + \comment{The acute accent `\'{}'.} +\endsetslot + +\setslot{\lc{Circumflex}{circumflex}} + \comment{The circumflex accent `\^{}'.} +\endsetslot + +\setslot{\lc{Tilde}{tilde}} + \comment{The tilde accent `\~{}'.} +\endsetslot + +\setslot{\lc{Dieresis}{dieresis}} + \comment{The umlaut or dieresis accent `\"{}'.} +\endsetslot + +\setslot{\lc{Hungarumlaut}{hungarumlaut}} + \comment{The long Hungarian umlaut `\H{}'.} +\endsetslot + +\setslot{\lc{Ring}{ring}} + \comment{The ring accent `\r{}'.} +\endsetslot + +\setslot{\lc{Caron}{caron}} + \comment{The caron or h\'a\v cek accent `\v{}'.} +\endsetslot + +\setslot{\lc{Breve}{breve}} + \comment{The breve accent `\u{}'.} +\endsetslot + +\setslot{\lc{Macron}{macron}} + \comment{The macron accent `\={}'.} +\endsetslot + +\setslot{\lc{Dotaccent}{dotaccent}} + \comment{The dot accent `\.{}'.} +\endsetslot + +\setslot{\lc{Cedilla}{cedilla}} + \comment{The cedilla accent `\c {}'.} +\endsetslot + +\setslot{\lc{Ogonek}{ogonek}} + \comment{The ogonek accent `\k {}'.} +\endsetslot + +\setslot{quotesinglbase} + \comment{A German single quote mark `\quotesinglbase' similar to a comma, + but with different sidebearings.} +\endsetslot + +\setslot{guilsinglleft} + \comment{A French single opening quote mark `\guilsinglleft', + unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{guilsinglright} + \comment{A French single closing quote mark `\guilsinglright', + unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{quotedblleft} + \comment{The English opening quote mark `\,\textquotedblleft\,'.} +\endsetslot + +\setslot{quotedblright} + \comment{The English closing quote mark `\,\textquotedblright\,'.} +\endsetslot + +\setslot{quotedblbase} + \comment{A German double quote mark `\quotedblbase' similar to two commas, + but with tighter letterspacing and different sidebearings.} +\endsetslot + +\setslot{guillemotleft} + \comment{A French double opening quote mark `\guillemotleft', + unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{guillemotright} + \comment{A French closing opening quote mark `\guillemotright', + unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{rangedash} + \ligature{LIG}{hyphen}{punctdash} + \comment{The number range dash `1--9'. In a monowidth font, this + might be set as `{\tt 1{-}9}'.} +\endsetslot + +\setslot{punctdash} + \comment{The punctuation dash `Oh---boy.' In a monowidth font, this + might be set as `{\tt Oh{-}{-}boy.}'} +\endsetslot + +\setslot{compwordmark} + \comment{An invisible glyph, with zero width and depth, but the + height of lowercase letters without ascenders. + It is used to stop ligaturing in words like `shelf{}ful'.} +\endsetslot + +\setslot{perthousandzero} + \comment{A glyph which is placed after `\%' to produce a + `per-thousand', or twice to produce `per-ten-thousand'. + Your guess is as good as mine as to what this glyph should look + like in a monowidth font.} +\endsetslot + +\setslot{\lc{dotlessI}{dotlessi}} + \comment{A dotless i `\i', used to produce accented letters such as + `\=\i'.} +\endsetslot + +\setslot{\lc{dotlessJ}{dotlessj}} + \comment{A dotless j `\j', used to produce accented letters such as + `\=\j'. Most non-\TeX\ fonts do not have this glyph. \actually{`ssi' + ligature}} +\endsetslot + +\setslot{\lclig{FF}{ff}} + \comment{The `ff' ligature. It should be two characters wide in a + monowidth font.} +\endsetslot + +\setslot{\lclig{FI}{fi}} + \comment{The `fi' ligature. It should be two characters wide in a + monowidth font.} +\endsetslot + +\setslot{\lclig{FL}{fl}} + \comment{The `fl' ligature. It should be two characters wide in a + monowidth font.} +\endsetslot + +\setslot{\lclig{FFI}{ffi}} + \comment{The `ffi' ligature. It should be three characters wide in a + monowidth font. \actually{`ch' ligature}} +\endsetslot + +\setslot{\lclig{FFL}{ffl}} + \comment{The `ffl' ligature. It should be three characters wide in a + monowidth font. \actually{`ck' ligature}} +\endsetslot + +\setslot{visiblespace} + \comment{A visible space glyph `\textvisiblespace'.} +\endsetslot + +\setslot{exclam} + \ligature{LIG}{quoteleft}{exclamdown} + \comment{The exclamation mark `!'.} +\endsetslot + +\setslot{quotedbl} + \comment{The `neutral' double quotation mark `\,\textquotedbl\,', + included for use in monowidth fonts, or for setting computer + programs. Note that the inclusion of this glyph in this slot + means that \TeX\ documents which used `{\tt\char`\"}' as an + input character will no longer work.} +\endsetslot + +\setslot{numbersign} + \comment{The hash sign `\#'.} +\endsetslot + +\setslot{dollar} + \comment{The dollar sign `\$'.} +\endsetslot + +\setslot{percent} + \comment{The percent sign `\%'.} +\endsetslot + +\setslot{ampersand} + \comment{The ampersand sign `\&'.} +\endsetslot + +\setslot{quoteright} + \ligature{LIG}{quoteright}{quotedblright} + \comment{The English closing single quote mark `\,\textquoteright\,'.} +\endsetslot + +\setslot{parenleft} + \comment{The opening parenthesis `('.} +\endsetslot + +\setslot{parenright} + \comment{The closing parenthesis `)'.} +\endsetslot + +\setslot{asterisk} + \comment{The raised asterisk `*'.} +\endsetslot + +\setslot{plus} + \comment{The addition sign `+'.} +\endsetslot + +\setslot{comma} + \ligature{LIG}{comma}{quotedblbase} + \comment{The comma `,'.} +\endsetslot + +\setslot{hyphen} + \ligature{LIG}{hyphen}{rangedash} + \ligature{LIG}{hyphenchar}{hyphenchar} + \comment{The hyphen `-'.} +\endsetslot + +\setslot{period} + \comment{The period `.'.} +\endsetslot + +\setslot{slash} + \comment{The forward oblique `/'.} +\endsetslot + +\setslot{\digit{zero}} + \comment{The number `0'. This (and all the other numerals) may be + old style or ranging digits.} +\endsetslot + +\setslot{\digit{one}} + \comment{The number `1'.} +\endsetslot + +\setslot{\digit{two}} + \comment{The number `2'.} +\endsetslot + +\setslot{\digit{three}} + \comment{The number `3'.} +\endsetslot + +\setslot{\digit{four}} + \comment{The number `4'.} +\endsetslot + +\setslot{\digit{five}} + \comment{The number `5'.} +\endsetslot + +\setslot{\digit{six}} + \comment{The number `6'.} +\endsetslot + +\setslot{\digit{seven}} + \comment{The number `7'.} +\endsetslot + +\setslot{\digit{eight}} + \comment{The number `8'.} +\endsetslot + +\setslot{\digit{nine}} + \comment{The number `9'.} +\endsetslot + +\setslot{colon} + \comment{The colon punctuation mark `:'.} +\endsetslot + +\setslot{semicolon} + \comment{The semi-colon punctuation mark `;'.} +\endsetslot + +\setslot{less} + \ligature{LIG}{less}{guillemotleft} + \comment{The less-than sign `\textless'.} +\endsetslot + +\setslot{equal} + \comment{The equals sign `='.} +\endsetslot + +\setslot{greater} + \ligature{LIG}{greater}{guillemotright} + \comment{The greater-than sign `\textgreater'.} +\endsetslot + +\setslot{question} + \ligature{LIG}{quoteleft}{questiondown} + \comment{The question mark `?'.} +\endsetslot + +\setslot{at} + \comment{The at sign `@'.} +\endsetslot + +\setslot{\uc{A}{a}} + \comment{The letter `{A}'.} +\endsetslot + +\setslot{\uc{B}{b}} + \comment{The letter `{B}'.} +\endsetslot + +\setslot{\uc{C}{c}} + \comment{The letter `{C}'.} +\endsetslot + +\setslot{\uc{D}{d}} + \comment{The letter `{D}'.} +\endsetslot + +\setslot{\uc{E}{e}} + \comment{The letter `{E}'.} +\endsetslot + +\setslot{\uc{F}{f}} + \comment{The letter `{F}'.} +\endsetslot + +\setslot{\uc{G}{g}} + \comment{The letter `{G}'.} +\endsetslot + +\setslot{\uc{H}{h}} + \comment{The letter `{H}'.} +\endsetslot + +\setslot{\uc{I}{i}} + \comment{The letter `{I}'.} +\endsetslot + +\setslot{\uc{J}{j}} + \comment{The letter `{J}'. But actually just an `I'\@.} +\endsetslot + +\setslot{\uc{K}{k}} + \comment{The letter `{K}'.} +\endsetslot + +\setslot{\uc{L}{l}} + \comment{The letter `{L}'.} +\endsetslot + +\setslot{\uc{M}{m}} + \comment{The letter `{M}'.} +\endsetslot + +\setslot{\uc{N}{n}} + \comment{The letter `{N}'.} +\endsetslot + +\setslot{\uc{O}{o}} + \comment{The letter `{O}'.} +\endsetslot + +\setslot{\uc{P}{p}} + \comment{The letter `{P}'.} +\endsetslot + +\setslot{\uc{Q}{q}} + \comment{The letter `{Q}'.} +\endsetslot + +\setslot{\uc{R}{r}} + \comment{The letter `{R}'.} +\endsetslot + +\setslot{\uc{S}{s}} + \comment{The letter `{S}'.} +\endsetslot + +\setslot{\uc{T}{t}} + \comment{The letter `{T}'.} +\endsetslot + +\setslot{\uc{U}{u}} + \comment{The letter `{U}'.} +\endsetslot + +\setslot{\uc{V}{v}} + \comment{The letter `{V}'.} +\endsetslot + +\setslot{\uc{W}{w}} + \comment{The letter `{W}'.} +\endsetslot + +\setslot{\uc{X}{x}} + \comment{The letter `{X}'.} +\endsetslot + +\setslot{\uc{Y}{y}} + \comment{The letter `{Y}'.} +\endsetslot + +\setslot{\uc{Z}{z}} + \comment{The letter `{Z}'.} +\endsetslot + +\setslot{bracketleft} + \comment{The opening square bracket `['.} +\endsetslot + +\setslot{backslash} + \comment{The backwards oblique `\textbackslash'. \actually{`sf' ligature}} +\endsetslot + +\setslot{bracketright} + \comment{The closing square bracket `]'.} +\endsetslot + +\setslot{asciicircum} + \ligature{LIG}{visiblespace}{germandbls} + \comment{The ASCII upward-pointing arrow head `\textasciicircum'. + This is included for compatibility with typewriter fonts used + for computer listings. \actually{`ss' ligature}} +\endsetslot + +\setslot{underscore} + \comment{The ASCII underline character `\textunderscore', usually + set on the baseline. + This is included for compatibility with typewriter fonts used + for computer listings. \actually{`st' ligature}} +\endsetslot + +\setslot{quoteleft} + \ligature{LIG}{quoteleft}{quotedblleft} + \comment{The English opening single quote mark `\,\textquoteleft\,'.} +\endsetslot + +\setslot{\lc{A}{a}} + \comment{The letter `{a}'.} +\endsetslot + +\setslot{\lc{B}{b}} + \comment{The letter `{b}'.} +\endsetslot + +\setslot{\lc{C}{c}} + \ligature{LIG}{h}{ffi} + \ligature{LIG}{k}{ffl} + \comment{The letter `{c}'.} +\endsetslot + +\setslot{\lc{D}{d}} + \comment{The letter `{d}'.} +\endsetslot + +\setslot{\lc{E}{e}} + \comment{The letter `{e}'.} +\endsetslot + +\setslot{\lc{F}{f}} + \ligature{LIG}{\lc{I}{i}}{\lclig{FI}{fi}} + \ligature{LIG}{\lc{F}{f}}{\lclig{FF}{ff}} + \ligature{LIG}{\lc{L}{l}}{\lclig{FL}{fl}} + \ligature{LIG}{\lc{T}{t}}{\lclig{backslash}{backslash}} + \comment{The letter `{f}'.} +\endsetslot + +\setslot{\lc{G}{g}} + \comment{The letter `{g}'.} +\endsetslot + +\setslot{\lc{H}{h}} + \comment{The letter `{h}'.} +\endsetslot + +\setslot{\lc{I}{i}} + \comment{The letter `{i}'.} +\endsetslot + +\setslot{\lc{J}{j}} + \comment{The letter `{j}'.} +\endsetslot + +\setslot{\lc{K}{k}} + \comment{The letter `{k}'.} +\endsetslot + +\setslot{\lc{L}{l}} + \comment{The letter `{l}'.} +\endsetslot + +\setslot{\lc{M}{m}} + \comment{The letter `{m}'.} +\endsetslot + +\setslot{\lc{N}{n}} + \comment{The letter `{n}'.} +\endsetslot + +\setslot{\lc{O}{o}} + \comment{The letter `{o}'.} +\endsetslot + +\setslot{\lc{P}{p}} + \comment{The letter `{p}'.} +\endsetslot + +\setslot{\lc{Q}{q}} + \comment{The letter `{q}'.} +\endsetslot + +\setslot{\lc{R}{r}} + \comment{The letter `{r}'.} +\endsetslot + +\setslot{\lc{S}{s}} +% \end{macrocode} +% The following ligature is with the boundary character and performs the +% transformation of the long~s to the round~s. +% \begin{macrocode} + \ligature{LIG}{visiblespace}{ng} + \ligature{LIG}{t}{underscore} + \ligature{LIG}{s}{asciicircum} + \ligature{LIG}{f}{backslash} + \ligature{LIG}{i}{dotlessj} +% \end{macrocode} +% The following ligatures make the long~s to become a round~s if one of these +% characters immediately follows. This prevents the user to insert |\/| and +% similar things at ubiquitous places. +% \begin{macrocode} + \ligature{LIG/}{quoteright}{ng} + \ligature{LIG/}{guilsinglleft}{ng} + \ligature{LIG/}{guilsinglright}{ng} + \ligature{LIG/}{quotedblleft}{ng} + \ligature{LIG/}{quotedblright}{ng} + \ligature{LIG/}{guillemotleft}{ng} + \ligature{LIG/}{guillemotright}{ng} + \ligature{LIG/}{period}{ng} + \ligature{LIG/}{comma}{ng} + \ligature{LIG/}{colon}{ng} + \ligature{LIG/}{semicolon}{ng} + \ligature{LIG/}{exclam}{ng} + \ligature{LIG/}{question}{ng} + \ligature{LIG/}{slash}{ng} + \ligature{LIG/}{hyphen}{ng} + \ligature{LIG/}{parenleft}{ng} + \ligature{LIG/}{parenright}{ng} + \comment{The letter `{s}'. \actually{letter long `s'}} +\endsetslot + +\setslot{\lc{T}{t}} + \ligature{LIG}{z}{bar} + \comment{The letter `{t}'.} +\endsetslot + +\setslot{\lc{U}{u}} + \comment{The letter `{u}'.} +\endsetslot + +\setslot{\lc{V}{v}} + \comment{The letter `{v}'.} +\endsetslot + +\setslot{\lc{W}{w}} + \comment{The letter `{w}'.} +\endsetslot + +\setslot{\lc{X}{x}} + \comment{The letter `{x}'.} +\endsetslot + +\setslot{\lc{Y}{y}} + \comment{The letter `{y}'.} +\endsetslot + +\setslot{\lc{Z}{z}} + \comment{The letter `{z}'.} +\endsetslot + +\setslot{braceleft} + \comment{The opening curly brace `\textbraceleft'.} +\endsetslot + +\setslot{bar} + \comment{The ASCII vertical bar `\textbar'. + This is included for compatibility with typewriter fonts used + for computer listings. \actually{`tz' ligature}} +\endsetslot + +\setslot{braceright} + \comment{The closing curly brace `\textbraceright'.} +\endsetslot + +\setslot{asciitilde} + \comment{The ASCII tilde `\textasciitilde'. + This is included for compatibility with typewriter fonts used + for computer listings.} +\endsetslot + +\setslot{hyphenchar} + \comment{The glyph used for hyphenation in this font, which will + almost always be the same as `hyphen'.} +\endsetslot + + +\setslot{\uctop{Abreve}{abreve}} + \comment{The letter `\u A'.} +\endsetslot + +\setslot{\uc{Aogonek}{aogonek}} + \comment{The letter `\k A'.} +\endsetslot + +\setslot{\uctop{Cacute}{cacute}} + \comment{The letter `\' C'.} +\endsetslot + +\setslot{\uctop{Ccaron}{ccaron}} + \comment{The letter `\v C'.} +\endsetslot + +\setslot{\uctop{Dcaron}{dcaron}} + \comment{The letter `\v D'.} +\endsetslot + +\setslot{\uctop{Ecaron}{ecaron}} + \comment{The letter `\v E'.} +\endsetslot + +\setslot{\uc{Eogonek}{eogonek}} + \comment{The letter `\k E'.} +\endsetslot + +\setslot{\uctop{Gbreve}{gbreve}} + \comment{The letter `\u G'.} +\endsetslot + +\setslot{\uctop{Lacute}{lacute}} + \comment{The letter `\' L'.} +\endsetslot + +\setslot{\uc{Lcaron}{lcaron}} + \comment{The letter `\v L'.} +\endsetslot + +\setslot{\uc{Lslash}{lslash}} + \comment{The letter `\L'.} +\endsetslot + +\setslot{\uctop{Nacute}{nacute}} + \comment{The letter `\' N'.} +\endsetslot + +\setslot{\uctop{Ncaron}{ncaron}} + \comment{The letter `\v N'.} +\endsetslot + +\setslot{\uc{Ng}{ng}} + \comment{The Sami letter `\NG'. It is unavailable in \plain\ \TeX. + \actually{letter `S'}} +\endsetslot + +\setslot{\uctop{Ohungarumlaut}{ohungarumlaut}} + \comment{The letter `\H O'.} +\endsetslot + +\setslot{\uctop{Racute}{racute}} + \comment{The letter `\' R'.} +\endsetslot + +\setslot{\uctop{Rcaron}{rcaron}} + \comment{The letter `\v R'.} +\endsetslot + +\setslot{\uctop{Sacute}{sacute}} + \comment{The letter `\' S'.} +\endsetslot + +\setslot{\uctop{Scaron}{scaron}} + \comment{The letter `\v S'.} +\endsetslot + +\setslot{\uc{Scedilla}{scedilla}} + \comment{The letter `\c S'.} +\endsetslot + +\setslot{\uctop{Tcaron}{tcaron}} + \comment{The letter `\v T'.} +\endsetslot + +\setslot{\uc{Tcedilla}{tcedilla}} + \comment{The letter `\c T'.} +\endsetslot + +\setslot{\uctop{Uhungarumlaut}{uhungarumlaut}} + \comment{The letter `\H U'.} +\endsetslot + +\setslot{\uctop{Uring}{uring}} + \comment{The letter `\r U'.} +\endsetslot + +\setslot{\uctop{Ydieresis}{ydieresis}} + \comment{The letter `\" Y'.} +\endsetslot + +\setslot{\uctop{Zacute}{zacute}} + \comment{The letter `\' Z'.} +\endsetslot + +\setslot{\uctop{Zcaron}{zcaron}} + \comment{The letter `\v Z'.} +\endsetslot + +\setslot{\uctop{Zdotaccent}{zdotaccent}} + \comment{The letter `\. Z'.} +\endsetslot + +\setslot{\uclig{IJ}{ij}} + \comment{The letter `IJ'. This is a single letter, and in a monowidth + font should ideally be one letter wide.} +\endsetslot + +\setslot{\uctop{Idotaccent}{idotaccent}} + \comment{The letter `\. I'.} +\endsetslot + +\setslot{\lc{Dbar}{dbar}} + \comment{The letter `\dj'.} +\endsetslot + +\setslot{section} + \comment{The section mark `\textsection'.} +\endsetslot + +\setslot{\lctop{Abreve}{abreve}} + \comment{The letter `\u a'.} +\endsetslot + +\setslot{\lc{Aogonek}{aogonek}} + \comment{The letter `\k a'.} +\endsetslot + +\setslot{\lctop{Cacute}{cacute}} + \comment{The letter `\' c'.} +\endsetslot + +\setslot{\lctop{Ccaron}{ccaron}} + \comment{The letter `\v c'.} +\endsetslot + +\setslot{\lctop{Dcaron}{dcaron}} + \comment{The letter `\v d'.} +\endsetslot + +\setslot{\lctop{Ecaron}{ecaron}} + \comment{The letter `\v e'.} +\endsetslot + +\setslot{\lc{Eogonek}{eogonek}} + \comment{The letter `\k e'.} +\endsetslot + +\setslot{\lctop{Gbreve}{gbreve}} + \comment{The letter `\u g'.} +\endsetslot + +\setslot{\lctop{Lacute}{lacute}} + \comment{The letter `\' l'.} +\endsetslot + +\setslot{\lc{Lcaron}{lcaron}} + \comment{The letter `\v l'.} +\endsetslot + +\setslot{\lc{Lslash}{lslash}} + \comment{The letter `\l'.} +\endsetslot + +\setslot{\lctop{Nacute}{nacute}} + \comment{The letter `\' n'.} +\endsetslot + +\setslot{\lctop{Ncaron}{ncaron}} + \comment{The letter `\v n'.} +\endsetslot + +\setslot{\lc{Ng}{ng}} +% \ligature{LIG/>}{hyphen}{s} +% \ligature{LIG/>}{hyphenchar}{s} + \comment{The Sami letter `\ng'. It is unavailable in \plain\ \TeX. + \actually{letter round `s'}} +\endsetslot + +\setslot{\lctop{Ohungarumlaut}{ohungarumlaut}} + \comment{The letter `\H o'.} +\endsetslot + +\setslot{\lctop{Racute}{racute}} + \comment{The letter `\' r'.} +\endsetslot + +\setslot{\lctop{Rcaron}{rcaron}} + \comment{The letter `\v r'.} +\endsetslot + +\setslot{\lctop{Sacute}{sacute}} + \comment{The letter `\' s'.} +\endsetslot + +\setslot{\lctop{Scaron}{scaron}} + \comment{The letter `\v s'.} +\endsetslot + +\setslot{\lc{Scedilla}{scedilla}} + \comment{The letter `\c s'.} +\endsetslot + +\setslot{\lctop{Tcaron}{tcaron}} + \comment{The letter `\v t'.} +\endsetslot + +\setslot{\lc{Tcedilla}{tcedilla}} + \comment{The letter `\c t'.} +\endsetslot + +\setslot{\lctop{Uhungarumlaut}{uhungarumlaut}} + \comment{The letter `\H u'.} +\endsetslot + +\setslot{\lctop{Uring}{uring}} + \comment{The letter `\r u'.} +\endsetslot + +\setslot{\lctop{Ydieresis}{ydieresis}} + \comment{The letter `\" y'.} +\endsetslot + +\setslot{\lctop{Zacute}{zacute}} + \comment{The letter `\' z'.} +\endsetslot + +\setslot{\lctop{Zcaron}{zcaron}} + \comment{The letter `\v z'.} +\endsetslot + +\setslot{\lctop{Zdotaccent}{zdotaccent}} + \comment{The letter `\. z'.} +\endsetslot + +\setslot{\lclig{IJ}{ij}} + \comment{The letter `ij'. This is a single letter, and in a monowidth + font should ideally be one letter wide.} +\endsetslot + +\setslot{exclamdown} + \comment{The Spanish punctuation mark `!`'.} +\endsetslot + +\setslot{questiondown} + \comment{The Spanish punctuation mark `?`'.} +\endsetslot + +\setslot{sterling} + \comment{The British currency mark `\textsterling'.} +\endsetslot + +\setslot{\uctop{Agrave}{agrave}} + \comment{The letter `\` A'.} +\endsetslot + +\setslot{\uctop{Aacute}{aacute}} + \comment{The letter `\' A'.} +\endsetslot + +\setslot{\uctop{Acircumflex}{acircumflex}} + \comment{The letter `\^ A'.} +\endsetslot + +\setslot{\uctop{Atilde}{atilde}} + \comment{The letter `\~ A'.} +\endsetslot + +\setslot{\uctop{Adieresis}{adieresis}} + \comment{The letter `\" A'.} +\endsetslot + +\setslot{\uctop{Aring}{aring}} + \comment{The letter `\r A'.} +\endsetslot + +\setslot{\uc{AE}{ae}} + \comment{The letter `\AE'. This is a single letter, and should not be + faked with `AE'.} +\endsetslot + +\setslot{\uc{Ccedilla}{ccedilla}} + \comment{The letter `\c C'.} +\endsetslot + +\setslot{\uctop{Egrave}{egrave}} + \comment{The letter `\` E'.} +\endsetslot + +\setslot{\uctop{Eacute}{eacute}} + \comment{The letter `\' E'.} +\endsetslot + +\setslot{\uctop{Ecircumflex}{ecircumflex}} + \comment{The letter `\^ E'.} +\endsetslot + +\setslot{\uctop{Edieresis}{edieresis}} + \comment{The letter `\" E'.} +\endsetslot + +\setslot{\uctop{Igrave}{igrave}} + \comment{The letter `\` I'.} +\endsetslot + +\setslot{\uctop{Iacute}{iacute}} + \comment{The letter `\' I'.} +\endsetslot + +\setslot{\uctop{Icircumflex}{icircumflex}} + \comment{The letter `\^ I'.} +\endsetslot + +\setslot{\uctop{Idieresis}{idieresis}} + \comment{The letter `\" I'.} +\endsetslot + +\setslot{\uc{Eth}{eth}} + \comment{The uppercase Icelandic letter `Eth' similar to a `D' + with a horizontal bar through the stem. It is unavailable + in \plain\ \TeX.} +\endsetslot + +\setslot{\uctop{Ntilde}{ntilde}} + \comment{The letter `\~ N'.} +\endsetslot + +\setslot{\uctop{Ograve}{ograve}} + \comment{The letter `\` O'.} +\endsetslot + +\setslot{\uctop{Oacute}{oacute}} + \comment{The letter `\' O'.} +\endsetslot + +\setslot{\uctop{Ocircumflex}{ocircumflex}} + \comment{The letter `\^ O'.} +\endsetslot + +\setslot{\uctop{Otilde}{otilde}} + \comment{The letter `\~ O'.} +\endsetslot + +\setslot{\uctop{Odieresis}{odieresis}} + \comment{The letter `\" O'.} +\endsetslot + +\setslot{\uc{OE}{oe}} + \comment{The letter `\OE'. This is a single letter, and should not be + faked with `OE'.} +\endsetslot + +\setslot{\uc{Oslash}{oslash}} + \comment{The letter `\O'.} +\endsetslot + +\setslot{\uctop{Ugrave}{ugrave}} + \comment{The letter `\` U'.} +\endsetslot + +\setslot{\uctop{Uacute}{uacute}} + \comment{The letter `\' U'.} +\endsetslot + +\setslot{\uctop{Ucircumflex}{ucircumflex}} + \comment{The letter `\^ U'.} +\endsetslot + +\setslot{\uctop{Udieresis}{udieresis}} + \comment{The letter `\" U'.} +\endsetslot + +\setslot{\uctop{Yacute}{yacute}} + \comment{The letter `\' Y'.} +\endsetslot + +\setslot{\uc{Thorn}{thorn}} + \comment{The Icelandic capital letter Thorn, similar to a `P' + with the bowl moved down. It is unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{\uclig{SS}{germandbls}} + \comment{The ligature `SS', used to give an upper case `\ss'. + In a monowidth font it should be two letters wide.} +\endsetslot + +\setslot{\lctop{Agrave}{agrave}} + \comment{The letter `\` a'.} +\endsetslot + +\setslot{\lctop{Aacute}{aacute}} + \comment{The letter `\' a'.} +\endsetslot + +\setslot{\lctop{Acircumflex}{acircumflex}} + \comment{The letter `\^ a'.} +\endsetslot + +\setslot{\lctop{Atilde}{atilde}} + \comment{The letter `\~ a'.} +\endsetslot + +\setslot{\lctop{Adieresis}{adieresis}} + \comment{The letter `\" a'.} +\endsetslot + +\setslot{\lctop{Aring}{aring}} + \comment{The letter `\r a'.} +\endsetslot + +\setslot{\lc{AE}{ae}} + \comment{The letter `\ae'. This is a single letter, and should not be + faked with `ae'.} +\endsetslot + +\setslot{\lc{Ccedilla}{ccedilla}} + \comment{The letter `\c c'.} +\endsetslot + +\setslot{\lctop{Egrave}{egrave}} + \comment{The letter `\` e'.} +\endsetslot + +\setslot{\lctop{Eacute}{eacute}} + \comment{The letter `\' e'.} +\endsetslot + +\setslot{\lctop{Ecircumflex}{ecircumflex}} + \comment{The letter `\^ e'.} +\endsetslot + +\setslot{\lctop{Edieresis}{edieresis}} + \comment{The letter `\" e'.} +\endsetslot + +\setslot{\lctop{Igrave}{igrave}} + \comment{The letter `\`\i'.} +\endsetslot + +\setslot{\lctop{Iacute}{iacute}} + \comment{The letter `\'\i'.} +\endsetslot + +\setslot{\lctop{Icircumflex}{icircumflex}} + \comment{The letter `\^\i'.} +\endsetslot + +\setslot{\lctop{Idieresis}{idieresis}} + \comment{The letter `\"\i'.} +\endsetslot + +\setslot{\lc{Eth}{eth}} + \comment{The Icelandic lowercase letter `eth' similar to + a `$\partial$' with an oblique bar through the stem. + It is unavailable in \plain\ \TeX.} +\endsetslot + +\setslot{\lctop{Ntilde}{ntilde}} + \comment{The letter `\~ n'.} +\endsetslot + +\setslot{\lctop{Ograve}{ograve}} + \comment{The letter `\` o'.} +\endsetslot + +\setslot{\lctop{Oacute}{oacute}} + \comment{The letter `\' o'.} +\endsetslot + +\setslot{\lctop{Ocircumflex}{ocircumflex}} + \comment{The letter `\^ o'.} +\endsetslot + +\setslot{\lctop{Otilde}{otilde}} + \comment{The letter `\~ o'.} +\endsetslot + +\setslot{\lctop{Odieresis}{odieresis}} + \comment{The letter `\" o'.} +\endsetslot + +\setslot{\lc{OE}{oe}} + \comment{The letter `\oe'. This is a single letter, and should not be + faked with `oe'.} +\endsetslot + +\setslot{\lc{Oslash}{oslash}} + \comment{The letter `\o'.} +\endsetslot + +\setslot{\lctop{Ugrave}{ugrave}} + \comment{The letter `\` u'.} +\endsetslot + +\setslot{\lctop{Uacute}{uacute}} + \comment{The letter `\' u'.} +\endsetslot + +\setslot{\lctop{Ucircumflex}{ucircumflex}} + \comment{The letter `\^ u'.} +\endsetslot + +\setslot{\lctop{Udieresis}{udieresis}} + \comment{The letter `\" u'.} +\endsetslot + +\setslot{\lctop{Yacute}{yacute}} + \comment{The letter `\' y'.} +\endsetslot + +\setslot{\lc{Thorn}{thorn}} + \comment{The Icelandic lowercase letter `thorn', similar to a `p' + with an ascender rising from the stem. It is unavailable + in \plain\ \TeX.} +\endsetslot + +\setslot{\lc{SS}{germandbls}} + \comment{The letter `\ss'.} +\endsetslot + +\endencoding + +\end{document} +%</t1fraketx> +% \end{macrocode} +% \Finale + +\endinput +%%% Local Variables: +%%% mode: latex +%%% TeX-master: t +%%% End: |