cmchar "ogonek accent" ; beginchar("n",8u#,0,.875desc_depth#) ; adjust_fit(0,0) ; x1 = .5w+ 1.5u ; if serifs: pickup crisp.nib; pos1(hair,-25); pos2(.8[vair,stem],45) ; pos3(vair,140) ; x1 = x2+.5u ; y2 = .8[y1,y5] ; rt x3l = w ; y3 = .4[y5,y1] ; x5 = 2/5[x2,x3] ; bot y5 =-d ; pos5(.6[vair,stem],90) ; bot y1 = o ; lft x4l = hround(x1-u) ; y4 = .5[y1,y2] ; pos4(.4[hair,stem],0) ; filldraw stroke z1e ..tension 1.2 .. z4e ..z2e .. z5e ..tension 1.2 .. z3e ; fi penlabels(1,2,3,4,5); endchar ;