%%
%% This is file `fontdoc.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% fontinst.dtx  (with options: `doc')
%% 
%% IMPORTANT NOTICE:
%% 
%% For the copyright see the source file.
%% 
%% You are *not* allowed to modify this file.
%% 
%% You are *not* allowed to distribute this file.
%% For distribution of the original source see the terms
%% for copying and modification in the file fontinst.dtx.
%% 
%%
\def\fontinstversion{1.801}
\def\filedate{1998/07/07}
\def\docdate{1998/07/07}
\ifx\ProvidesPackage\undefined
   \def\NeedsTeXFormat#1{}
   \def\ProvidesPackage#1[#2]{}
\fi
\ProvidesPackage{fontdoc}
[\filedate\space v\fontinstversion\space
  fontinst documentation package]
\newdimen\a@dimen
\newcount\a@count
\def\x@cs#1#2{\expandafter#1\csname#2\endcsname}
\def\setcommand#1{\ifx#1\undefined@command
   \expandafter\def\expandafter#1\else
   \expandafter\def\expandafter\a@command\fi}
\def\resetcommand#1{\def#1}
\def\ifisglyph#1\then{\iftrue}
\def\ifisint#1\then{\iftrue}
\def\ifisdim#1\then{\iftrue}
\def\ifisstr#1\then{\iftrue}
\let\then=\iffalse
\def\setdim#1#2{\a@dimen=#2\relax\Bheading{Default} #1 = \the\a@dimen}
\def\setint#1#2{\Bheading{Default} #1 = $\expression0{#2}$}
\def\setstr#1#2{\Bheading{Default} #1 = #2}
\def\resetdim#1#2{\a@dimen=#2\relax\Bheading{Value} #1 = \the\a@dimen}
\def\resetint#1#2{\Bheading{Value} #1 = $\expression0{#2}$}
\def\resetstr#1#2{\Bheading{Value} #1 = #2}
\def\expression#1#2{\a@count=#1\relax#2}
\def\priority#1#2{
   \ifnum\a@count<#1
      \let\next=\identity
   \else
      \let\next=\bracket
   \fi
   \next{#2}}
\def\identity#1{#1}
\def\bracket#1{(#1)}
\let\plainint=\int
\let\plaindiv=\div
\def\int#1{{\fam0#1}}
\def\width#1{w({\fam0#1})}
\def\height#1{h({\fam0#1})}
\def\depth#1{d({\fam0#1})}
\def\italic#1{i({\fam0#1})}
\def\kerning#1#2{k({\fam0#1})({\fam0#1})}
\def\neg#1{\priority8{-\expression6{#1}}}
\def\add#1#2{\priority2{\expression2{#1}+\expression2{#2}}}
\def\sub#1#2{\priority2{\expression3{#1}-\expression3{#2}}}
\def\mul#1#2{\priority4{\expression4{#1}\times\expression4{#2}}}
\def\div#1#2{\priority4{\expression5{#1}/\expression5{#2}}}
\def\max#1#2{\priority6{\expression6{#1}\sqcup\expression6{#2}}}
\def\min#1#2{\priority7{\expression7{#1}\sqcap\expression7{#2}}}
\def\scale#1#2{\div{\mul{#1}{#2}}{1000}}
\def\Aheading#1{\par\medskip\noindent{\bf#1}\par}
\def\Bheading#1{\par\noindent{\bf#1}}
\def\needsfontinstversion#1{\Bheading{Needs fontinst v#1}}
\def\encoding{\bgroup\slot@number=0}
\def\endencoding{\egroup}
\newcount\slot@number
\def\nextslot#1{\slot@number=#1\relax}
\def\skipslots#1{\advance\slot@number by #1\relax}
\newif\ifslot@comment@
\slot@comment@false
\def\slot@comment{}
\def\setslotcomment#1{%
   \slot@comment@true
   \gdef\slot@comment{#1}}
\def\resetslotcomment#1{%
   \gdef\slot@comment{#1}}
\def\unsetslotcomment{%
   \slot@comment@false
   \gdef\slot@comment{}}
\let\slot@font=\nullfont
\def\useexamplefont#1{\font\slot@font=#1 }
\def\slotexample{{\slot@font\char\the\slot@number}}
\def\setslot#1{\def\slot@name{#1}%
   \Aheading{Slot \the\slot@number\space `#1'}%
   \ifslot@comment@ \comment{\slot@comment}\fi}
\def\endsetslot{\advance\slot@number by 1\relax}
\def\comment{\par\noindent}
\def\ligature#1{\Bheading{Ligature} \csname doc-#1\endcsname}
\x@cs\def{doc-LIG}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow #2$}
\x@cs\def{doc-/LIG}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow \slot@name * #2$}
\x@cs\def{doc-LIG/}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow #2 * #1$}
\x@cs\def{doc-/LIG/}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow \slot@name * #2 * #1$}
\x@cs\def{doc-/LIG>}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow \slot@name + #2$}
\x@cs\def{doc-LIG/>}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow #2 + #1$}
\x@cs\def{doc-/LIG/>}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow \slot@name + #2 * #1$}
\x@cs\def{doc-/LIG/>>}#1#2{%
  $\fam0 \slot@name * #1 \rightarrow \slot@name + #2 + #1$}
\def\nextlarger#1{\Bheading{Next larger} #1}
\def\varchar{\Bheading{Extensible glyph:}}
\def\vartop#1{\Bheading{Top} #1}
\def\varmid#1{\Bheading{Middle} #1}
\def\varbot#1{\Bheading{Bottom} #1}
\def\varrep#1{\Bheading{Repeated} #1}
\let\endvarchar\relax
\def\metrics{\bgroup}
\def\endmetrics{\egroup}
\def\setkern#1#2#3{%
   \Bheading{Kern} ${\fam0 #1 + #2} \rightarrow \expression0{#3}$}
\def\setleftkerning#1#2#3{%
   \Bheading{Kern} #1 on the left like #2 scaled $\expression0{#3}$}
\def\setrightkerning#1#2#3{%
   \Bheading{Kern} #1 on the right like #2 scaled $\expression0{#3}$}
\def\setleftrightkerning#1#2#3{%
   \Bheading{Kern} #1 on the left and right like #2 scaled $\expression0{#3}$}
\def\setrawglyph#1#2#3#4#5#6#7#8{\Aheading{Glyph `#1'}
   \Bheading{Taken from} slot #4 in font #2}
\def\setglyph#1{\Aheading{Glyph `#1'}}
\def\resetglyph#1{\Aheading{Reset glyph `#1'}}
\def\endsetglyph{}
\def\endresetglyph{}
\def\glyph#1#2{\Bheading{Glyph} `#1' scaled $\expression0{#2}$}
\def\glyphrule#1#2{%
  \Bheading{Rule} $\expression0{#1}$ by $\expression0{#2}$}
\def\glyphspecial#1{\Bheading{Special} `#1'}
\def\glyphwarning#1{\Bheading{Warning} `#1'}
\def\movert#1{\Bheading{Rt}~$\expression0{#1}$}
\def\moveup#1{\Bheading{Up}~$\expression0{#1}$}
\def\push{\Bheading{Push}}
\def\pop{\Bheading{Pop}}
\def\resetwidth#1{\Bheading{Reset width to $\expression0{#1}$}}
\def\resetheight#1{\Bheading{Reset height to $\expression0{#1}$}}
\def\resetdepth#1{\Bheading{Reset depth to $\expression0{#1}$}}
\def\resetitalic#1{\Bheading{Reset italic to $\expression0{#1}$}}
\raggedright
\raggedbottom
\def\plain{{\tt plain}}
\endinput
%%
%% End of file `fontdoc.sty'.
