diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/tipa/tipatr.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/tipa/tipatr.mf | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/tipa/tipatr.mf b/Master/texmf-dist/fonts/source/public/tipa/tipatr.mf new file mode 100644 index 00000000000..b57c662e8ef --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/tipa/tipatr.mf @@ -0,0 +1,31 @@ +% tipatr.mf -- correction for Times Roman compatible fonts +% Copyright 1996-2003 FUKUI Rei +% +% 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. +% +% This program consists of all files listed in Manifest.txt. +% +% Version 1.2 2003/01/01 +% + +def bulb(suffix $,$$,$$$) = + z$$$r=z$$r; + numeric theta; theta=angle(0,y$r-y$$r); + filldraw z$r{x$$r-x$r,0}...{0,y$$r-y$r}z$$r...{dir theta}z$$$l... + {x$r-x$$r,0}z$l--cycle; + enddef; + +def bulbvar(suffix $,$$,$$$) = + z$$$r=z$$r; + numeric theta; theta=angle(x$r-x$$r,0); + filldraw z$r{0,y$$r-y$r}...{x$$r-x$r,0}z$$r...{dir theta}z$$$l... + {0,y$r-y$$r}z$l--cycle; + enddef; + +endinput |