beginchar(oct"214",em#,6cap#/7,dth#); "Ligature: cT"; path p[]; save ww,hh,dd; ww = w/5; hh = h/3; dd = d; b := .2ww; x0 = x2 = 2ww; x1 = 2.2ww; x3 = 1.75ww; x4 = 2.5ww; x5 = 3ww; y0 = -.7dd; y1 = .2hh; y2 = .1hh; y3 = .5hh; y4 = hh; y5 = .9hh; z6 = z1; penpos0(b,0); penpos1(b,0); penpos2(b,90); penpos3(.8b,0); penpos4(b,-90); penpos5(1.7b,-90); penpos6(b,angle(z2-z1)-90); penstroke z0e{up}..{up}z1e; penstroke z6e{left}..z2e..{up}z3e..{right}z4e..z5e; pickup pencircle scaled 1.7b; drawdot z5; endchar;