diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/engwar/luvar.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/engwar/luvar.mf | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/Master/texmf-dist/fonts/source/public/engwar/luvar.mf b/Master/texmf-dist/fonts/source/public/engwar/luvar.mf deleted file mode 100644 index a7a5faa74b4..00000000000 --- a/Master/texmf-dist/fonts/source/public/engwar/luvar.mf +++ /dev/null @@ -1,50 +0,0 @@ -% Copyright 1986 Michael Urban -% Everyone is granted permission to copy, modify and redistribute -% this file, provided that a currently-dated copy of this -% copyright notice is included in the copy. -% License is granted to produce fonts based on the information -% in this file, provided that such fonts are redistributed -% without charge to any third party. - -% SCCS ID @(#)luvar.mf 1.1 10/1/86 - -def luva(expr startpt, endx, looped) = -begingroup; - save x,y; - z5 = startpt; - top y6=xht; x6=.5[x5,endx]; - rt x7=endx; y7=.47xht; - if looped : - bot y8 =0; x8=1/4[x6,endx]; - y9 = .7thick; z9=whatever*(dir (tilt+90))+z8; - draw z5..z6..z7{down}..z8{left}..z9; % lu'va (bow) - else: - bot y8 =0; x8=.7[x6,endx]; - draw z5..z6..z7{down}..z8;%{dir (tilt+180)}; - fi; - bowpoint:= z7; - hookpoint := z8; - penlabels(5,6,7,8,9); -endgroup; -enddef; - -def nuluva(expr startpt, endx, looped) = -begingroup; - save x,y; - z5 = startpt; - bot y6=0; x6=.5[x5,endx]; - lft x7=endx; y7=.45xht; - if looped : - top y8 =xht; x8=1/4[x6,endx]; - y9 = xht-.7thick; z9=whatever*(dir (tilt-90))+z8; - draw z5..z6..z7{up}..z8{right}..z9; % lu'va (bow) - else: - top y8 =xht; x8=.7[x6,endx]; - draw z5..z6..z7{up}..z8;%{dir (tilt)}; - fi; - bowpoint:= z7; - hookpoint := z8; - penlabels(5,6,7,8,9); -endgroup; -enddef; - |