%tel11ny% non-uniform pen(y-axis)
input telmode;
font_size 11pt#;
slant:=0;
pen_width#:=0.60pt#;
vardef special_telpen =
   pickup pencircle xscaled pen_width yscaled (pen_width/2);
enddef;
input telparam;
%%