diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf | 22 |
1 files changed, 9 insertions, 13 deletions
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf index 6a3c662c4ca..c13577b0877 100644 --- a/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf +++ b/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf @@ -4,13 +4,13 @@ %% Cyrillic font container with T2 encoding beta-support % % This file is future part of lxfonts package -% Version 3.4 // Patchlevel=0 +% Version 3.5 // Patchlevel=0 % (c) O.Lapko % -% This package belongs to the public domain under conditions similar to +% This package is freeware product under conditions similar to % those of D. E. Knuth specified for the Computer Modern family of fonts. % In particular, only the authors are entitled to modify this file -% and to save it under the same name. +% (and all this package as well) and to save it under the same name. % % Content: % @@ -63,7 +63,7 @@ % r_tl - - - "bb Er with tail % -LHver_check(3,4); % like |version_check| in ec +LHver_check(3,5); % like |version_check| in ec iff knuthian_ae:% lhchar "Italic Cyrillic letter ae - ligature ae"; @@ -167,7 +167,7 @@ cyrbulb(7,8,9); enddef; ogonek_breadth:=xvair; numeric tt; % the time... - tt=if hefty: 2.8 else: 2.6 fi+eps; + tt=if hefty: 2.8 else: 2.7 fi+eps; join_angle=angle((direction tt of p.r) rotated 180); ogonek_pos=point tt of p.r+.5(the_pen-fine)* unitvector((direction tt of p.r) rotated 90)-(ogonek_breadth-the_pen,0); @@ -598,14 +598,11 @@ filldraw circ_stroke z6e--z7'e; % right stem filldraw stroke z10e--z11e; % bar %%% pos12(vair,-90); pos13(hair,-180); pos14(flare,-180); pos5(stem,0); -x5=x3; bot y5=-1/3d; bot y12r=-d-oo; y14-.5flare=-vround.9d; -%x6=w-11/3u; lft x7r=min(x4-4u,lft x7r+x6-x7l+5u-eps); -%x12=(x3+2.5u-.5stem)-10/3u; lft x13r=min(x3-10/3u,lft x13r+x12-x13l+13/3u-eps);%!!! +x5=x3; bot y5=-1/3d; bot y12r=-d-oo; y14=-vround min(.9d+.5flare,y3)-eps; x12=(x3+2.5u-.5stem)-9/3u; lft x14r=min(x3-8/3u,lft x13r+x12-x13l+11/3u-eps);%!!! -%filldraw circ_stroke z3e--z5e{down}...{left}z12e; % right stem and hook forsuffixes e=l,r: - z12'e=((0,y14)--(w,y14)) intersectionpoint - (z5e{down}...{left}z12e); endfor + z12'e=((-u,y14)--(w+u,y14)) intersectionpoint + (z3e--z5e{down}...{left}z12e); endfor if lft x12'l>rt x14l+max(1,hround(1/3vair+.5)): filldraw stroke z3e--z5e{down}...{left}z12e; % right stem and hook else: @@ -616,8 +613,7 @@ x12=(x3+2.5u-.5stem)-9/3u; lft x14r=min(x3-8/3u,lft x13r+x12-x13l+11/3u-eps);%!! bulb(12,13,14); % bulb penlabels(0,1,2,3,4,5,6,7,8,9,10); endchar; -iff serifs: -lhchar "Lowercase Cyrillic letter delta - Lowercase Greek delta"; +lhchar "Italic Cyrillic letter delta - looks like lowercase Greek delta"; cyrchar(delta,8u#,asc_height#,0); italcorr .9asc_height#*slant+.5hair#-1.5u#; adjust_fit(0,0); pickup fine.nib; |