summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/tipa/tipatr.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/tipa/tipatr.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/tipa/tipatr.mf31
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