beginchar("v",.3em#,4cap#/7,.5dth#); "ksi"; path p[]; save ww,hh,dd; ww = w/3; hh = h/4; dd = d/1; b := .3ww; z0 = (2.5ww,3.8hh); x1 = x3 = x5 = .8ww; x2 = x4 = x6 = 2.2ww; y5 = .25hh; y3 = 1.6hh; y1 = 3.3hh; y4 = 1.1hh; y2 = 2.6hh; y6 = y7 = -.5dd; x7 = 1.7ww; p0 = z0{dir160}..z1{down}..z2{dir25}; z8 = point 1.6 of p0; p1 = z2{left}..z3{down}..z4{dir25}; z9 = point 1.6 of p1; p2 = z4{left}..z5{down}..z6{down}..z7; penpos0(2b,250); penpos1(2b,0); penpos2(2b,90); penstroke z0e{dir160}..z1e{down}..z2e{dir25}; z10 = z2; penpos10(2b,250); penpos8(2b,270); penpos3(2b,0); penpos4(2b,90); penstroke z10e{dir160}..z8e..z3e{down}..z4e{dir25}; z11 = z4; penpos11(2b,90); penpos9(2b,90); penpos5(2b,210); penpos6(3b,190); penpos7(2b,0); penstroke z4e{left}..z5e{down}..z6e{down}..z7e; endchar;