~ubuntu-branches/ubuntu/saucy/tipa/saucy

« back to all changes in this revision

Viewing changes to mf/tipasym2.mf

  • Committer: Bazaar Package Importer
  • Author(s): Rafael Laboissiere
  • Date: 2006-06-19 11:42:41 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20060619114241-t3cx342m12stjaxm
debian/postrm: Removed this file, whose job is done automatically by
dh_installtex (this should hopefully really closes: #335990).  Thanks
again to Norbert Preining for the heads up.

Show diffs side-by-side

added added

removed removed

Lines of Context:
620
620
fill stroke z10e--z11'e;  % crossbar
621
621
pickup fine.nib; top y3r=h+vround 1.5oo;
622
622
if serifs: pos1(flare,180); pos2(mfudged.hair,180);
623
 
 pos3(vair,90);  lft x1r=hround max(u,2.1u-.5flare); x3=4u;
 
623
 pos3(vair,90); lft x1r=hround max(u,2.1u-.5flare); x3=4u;
624
624
 y1=min(bar_height+.5flare+2vair+2,.9[bar_height,h]-.5flare);
625
625
 bulb(3,2,1);  % bulb
626
626
else: pos1(5/7[vair,flare],95); x1l=good.x 1.5u; x1r:=good.x x1r;
631
631
pos5(mfudged.stem,0); x5=x4; y5=min(y4,y13);
632
632
filldraw stroke super_arc.e(3,4)&z4e--z5e;  % arc and stem
633
633
pos6(.6[thin_join,vair],90); x6=x4; bot y6=y10l;
634
 
pos7(left_curve,180);
 
634
pos7(left_curve,if (Times_Compat and serifs): 200 else: 180 fi);
635
635
lft x7r=hround max(.5u,1.5u-.5left_curve); y7=1/3[top y8l,top y6r];
636
 
pos8(vair,270); x8l=3.75u; bot y8r=-oo;
 
636
if (Times_Compat and serifs): pos8(.6[vair,flare],210); else: pos8(vair,270);fi
 
637
x8l=3.75u; bot y8r=-oo;
637
638
pos9(.5[vair,fudged.stem],360); x9=x5; y9=.55bar_height;
638
639
(x',y8r)=whatever[z8l,z9l]; x8r:=max(x',x8-u);
639
640
{{interim superness:=more_super;
640
 
 filldraw stroke z9e{down}...z8e{left}...{up}z7e&super_arc.e(7,6)}}; % bowl
 
641
 filldraw stroke z9e{down}...z8e{left}...{up}z7e&%super_arc.e(7,6)}}; % bowl
 
642
 if (Times_Compat and serifs): z7e{up}...{(50,10)}z6e
 
643
 else: super_arc.e(7,6)fi}}; % bowl
641
644
if y9<y5: filldraw stroke z5e{down}..{down}z9e; fi  % link (usually hidden)
642
645
penlabels(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15); endchar;
643
646