beginchar(oct"050",.8em#,cap#,0dth#); "Diastoli"; picture DIACTOLH; path p[]; x0 = x1 = .5w; y0 = h - y1 = 0; pickup pencircle scaled .8pt; draw z0--z1; DIACTOLH = currentpicture; endchar;