% ital-z.mf % from itall.mf % % Computer Modern Italic lower case: % This lowercase italic alphabet was prepared by D. E. Knuth in December, 1979, % inspired by the Monotype faces used in {\sl The Art of Computer Programming}. % The programs were revised for the new \MF\ conventions in 1985. % Character codes \0141 through \0172 are generated. %not % cmchar "Italic letter z"; % beginchar("z",5.5u#+max(1.5u#,stem#),x_height#,0); \"Dynamic letter z"; beginchar(122,5.5u#+max(1.5u#,stem#),x_height#,0); italcorr x_height#*slant+.5hair#; adjust_fit(if monospace:.5u#,.5u# else: 0,0 fi); pickup fine.nib; pos1(hair,0); pos2(stem,-90); pos3(vair,-90); pos4(hair,0); lft x1l=hround(u-.5hair); x2=2.5u; x3=w-2u; rt x4r=hround(w-.5u); top y1=.78h; top y2l=top y4=h+oo; y3=.825h; pos5(hair,0); pos6(vair,-90); pos7(stem,-90); pos8(hair,0); x5=x1; x6=2.5u; x7=w-2u; x8+.5hair=hround(w+.5hair-eps); bot y5=bot y7r=-oo; y6=.175h; bot y8=.31h; pair p; p=(z4-z5) yscaled 2; filldraw stroke z1e{up}...z2e{right}..z3e{right}...{p}z4e; % upper bar filldraw stroke z5e{p}...z6e{right}..{right}z7e...{up}z8e; % lower bar filldraw stroke z5e{p}..{p}z4e; % diagonal math_fit(0,1/3x_height#*slant+.5hair#+.5u#); penlabels(1,2,3,4,5,6,7,8); endchar;