diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf index dc04fb84654..dc70e66b5e8 100644 --- a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf +++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.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: % @@ -27,7 +27,7 @@ % Vdzhe % -LHver_check(3,4); % like |version_check| in ec +LHver_check(3,5); % like |version_check| in ec lhchar "Lowercase Cyrillic letter Vg_hcrs - Variant ghe hcrossed"; cyrchar(Vg_hcrs,8u#-.5width_adj#,x_height#,0); @@ -115,7 +115,7 @@ if serifs: w:=w+1.7u; % tail_part(2); _zero:=2; -_one:=6; _two:=7; _three:=8; _four:=9; _five:=10; +_one:=6; _two:=7; _three:=8; _five:=10; _six:=11; _seven:=12; _eight:=13; _nine:=14; % pickup tiny.nib; @@ -124,8 +124,10 @@ bulb_diam=max(currentbreadth+eps,min(.82d-1-eps,hround 7/8[hair,flare])); set_bar_axis; y[_one]r=y[_two]r=y2.bh; y[_one]l=y[_two]l=y1.bh; penpos[_three](max(currentbreadth+eps,curve if hefty:-3stem_corr fi),0); y[_three]=.5[y[_one]r,-d]; -x[_two]l=x[_two]r=w-4.75u; x[_one]l=x[_one]r=x[_zero]; -x[_three]r=hround(w-u); x[_two]l:=x[_four]l:=x[_two]r-.25curve; +x[_two]l=x[_two]r=max(x[_zero]+.25curve,w-4.75u)+eps; +x[_one]l=x[_one]r=x[_zero]-eps; +x[_three]r=hround(w-u); x[_two]l:=x[_two]r-.25curve+eps; +if x[_three]l<tiny.rt x[_zero]r: x[_three]l:=tiny.rt x[_zero]r+eps; fi {{interim superness:=more_super; fill stroke super_arc.e([_three],[_two])..z[_one]e}}; % lobe if serifs: z[_five]=z[_three]; pos[_five](curve if hefty:-3stem_corr fi,0); |