diff options
author | Karl Berry <karl@freefriends.org> | 2013-04-01 22:49:23 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-04-01 22:49:23 +0000 |
commit | 8777c8fe30b9d22c6225e4e7539065d7df524590 (patch) | |
tree | 4db1ee985430c5f21e8a774152941169405fd4c2 /Master/texmf-dist/fonts/source/public | |
parent | e315cd0aa18acc9071dd2866763fdf2da0233fe7 (diff) |
rm tram, author request
git-svn-id: svn://tug.org/texlive/trunk@29596 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source/public')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/tram/tram.mf | 82 |
1 files changed, 0 insertions, 82 deletions
diff --git a/Master/texmf-dist/fonts/source/public/tram/tram.mf b/Master/texmf-dist/fonts/source/public/tram/tram.mf deleted file mode 100644 index 163ffbec601..00000000000 --- a/Master/texmf-dist/fonts/source/public/tram/tram.mf +++ /dev/null @@ -1,82 +0,0 @@ -%% -%% This is file `tram.mf', - -%% -%% __________________________________ -%% Copyright © 2011 Vafa Khalighi -%% -%% License information appended. -%% -%% - - -font_identifier:="tram"; -mode_setup; -em#:=10pt#; -fctrs [1] = 0.25; -fctrs [2] = 0.30; -fctrs [3] = 0.35; -fctrs [4] = 0.40; -fctrs [5] = 0.45; -fctrs [6] = 0.50; -fctrs [7] = 0.60; -fctrs [8] = 0.75; -bwd = 0.1; -for i = 1 step 1 until 16: - penwd [i] = bwd; - bwd := bwd * 1.2; -endfor; -picture bpic,cpic; -boolean badpen; -ch:=0; cnt:=10; - -for peni = 1 step 1 until 16: - pen_x#:=penwd [peni] * pt#; - for fctri = 1 step 1 until 8: - wd#:=(1.5*1/(fctrs [fctri]))*pen_x#; - define_pixels(pen_x, wd); - badpen := false; - if pen_x < 1.0 : pen_x := 1.0; badpen := true; fi - cpic:=nullpicture; - fw := 5pt# / wd#; fw := round (fw + 0.5); if fw < 1 : fw := 1; fi; - fw := 2fw; % showvariable pen_x; showvariable fw; showvariable wd; - beginchar(ch,fw*wd#,fw*wd#,0); - x1:=0; x2:=x1; x3:=(1+.5wd); x4:=x3; - y1:=.5wd; y2:=(y1+wd); y3:=(y1-.5wd); y4:=(y3+wd); - if badpen or (wd < 2.99) : - x1 := x2 := 0.wd; y1 := y2 := 0.5wd; - fi; - fill fullcircle scaled pen_x shifted(z1); - fill fullcircle scaled pen_x shifted(z2); - if not badpen or (wd > 3) : - fill fullcircle scaled pen_x shifted(z3); - fill fullcircle scaled pen_x shifted(z4); - fi; - bpic:=currentpicture; - for i = 1 step 1 until fw - 1: - currentpicture:=currentpicture + bpic shifted (i*wd, 0); - endfor; - bpic:=currentpicture; - for i = 2 step 2 until fw - 1: - currentpicture:=currentpicture + bpic shifted (0, i*wd); - endfor; - endchar; - ch := ch + 1; - endfor; %%% fctri -endfor; %%% peni -end; -%% -%% Copyright © 2011 by Vafa Khalighi <vafaklg@gmail.com> -%% -%% Distributable under the LaTeX Project Public License, -%% version 1.3c or higher (your choice). The latest version of -%% this license is at: http://www.latex-project.org/lppl.txt -%% -%% This work is "maintained" (as per LPPL maintenance status) -%% by Vafa Khalighi. -%% -%% -%% -%% -%% -%% End of file `tram.mf'. |