beginchar(oct"202",em#,6cap#/7,dth#); "Ligature: EN"; path p[]; save ww,hh,dd; ww = w/5; hh = h/3; dd = d; b := .2ww; x0 = x3 = 2ww; x2 = x5 = 1.5ww; x13= x6 = x7 = 2.2ww; x10= x9 = 3.5ww; x14= x8 = .5[x7,x9]; x11= 3.7ww; y11 = 1.6hh; x1 = ww; y1 = y5 = y3 = hh; y0 = y8 = 0; y2 = y6 = y10 = 1.5hh; y7 = y9 = .4hh; x4 = 1.8ww; y4 = .8hh; y13= -.4dd; y14 = -.5dd; p0 = z0{left}..{up}z1{up}..{right}z2..{down}z3..{left}z4..{up}z5; p1 = z6{down}..{down}z7..{right}z8{right}..z9{up}..{up}z10..{z10-z11}z11; z15= point 1.3 of p1; p2 = z15{z13-z15}..z13..{right}z14; penpos5(b,180); penpos4(.9b,-90); penpos3(.7b,0); penpos2(.5b,90); penpos1(2b,180); penpos0(b,-25); penstroke z5e{down}..z4e{right}..z3e{up}..z2e{left}..z1e{down}..{right}z0e; penpos6(b,180); penpos7(b,180); penpos8(.8b,-90); penpos9(b,0); penpos10(1.5b,25); penpos11(b,angle(z11-z10)-90); penstroke z6e{down}..{down}z7e..{right}z8e{right}..z9e{up}..z10e; penpos15(b,angle(z13-z15)-90); penpos13(b,angle(z13-z15)-90); penpos14(b,-90); penstroke z15e{z13-z15}..z13e..{right}z14e; pickup pencircle scaled b; drawdot z6; endchar;