git.marmaro.de Git - mmh/blob - docs/historical/mh-6.8.5/papers/trusted/figure3.pic

   1 .PS 5.9i
   2 ## figure 3
   3 C1:     ellipse "\UA/"
   4 B1:     box "\MTA/" with .n at (C1.s.x, C1.s.y-3*lineht)
   5 B8:     box "\MTA/" with .w at (B1.e.x+linewid, B1.e.y)
   6 B2:     box invis "$\ldots$" with .w at (B8.e.x+linewid, B1.e.y)
   7 B9:     box invis "$\ldots$" with .w at (B2.e.x+linewid, B1.e.y)
   8 B3:     box "\MTA/" with .w at (B9.e.x+linewid, B1.e.y)
   9 C2:     ellipse "\UA/" with .s at (B3.n.x, C1.s.y)
  10 ##
  11         arrow from C1.s to B1.n
  12         arrow from B1.e to B8.w
  13         arrow from B8.e to B2.w
  14         arrow from B2.e to B9.w
  15         arrow from B9.e to B3.w
  16         arrow from B3.n to C2.s
  17 ##
  18 B4:     box width B3.e.x+linewid/3-(B1.w.x-linewid/3) \
  19             height 3*boxht \
  20             with .c at B2.c
  21         move to (B4.n.x, B4.n.y-lineht/2); "\MTS/"
  22 ##
  23 B5:     box "\TMA/" with .w at (C1.e.x+linewid, C1.e.y)
  24 B6:     box "\TMA/" with .e at (C2.w.x-linewid, C2.w.y)
  25 B7:     box "\KDS/" with .c at ((B5.c.x+B6.c.x)/2, B5.c.y)
  26 ##
  27         line <- -> from C1.e to B5.w
  28         arrow from B5.e to B7.w
  29         arrow from B6.w to B7.e
  30         line <- -> from C2.w to B6.e
  31 ##
  32 .PE