diplodocus.org Git - nmh/blob - docs/historical/mh-6.8.5/papers/trusted/figure2.pic

   1 \def\UA/{{\sf UA}}
   2 \def\MTA/{{\sf MTA}}
   3 \def\MTS/{{\sf MTS}}
   4 .PS 5.9i
   5 ## figure 2
   6 U1:     circle "user"
   7 C1:     ellipse "\UA/" with .n at (U1.s.x, U1.s.y-3*lineht/2)
   8 B1:     box "\MTA/" with .n at (C1.s.x, C1.s.y-5*lineht/2)
   9 B8:     box "\MTA/" with .w at (B1.e.x+linewid, B1.e.y)
  10 B2:     box invis "$\ldots$" with .w at (B8.e.x+linewid, B1.e.y)
  11 B9:     box invis "$\ldots$" with .w at (B2.e.x+linewid, B1.e.y)
  12 B3:     box "\MTA/" with .w at (B9.e.x+linewid, B1.e.y)
  13 C2:     ellipse "\UA/" with .s at (B3.n.x, C1.s.y)
  14 U2:     circle "user" with .s at (C2.n.x, U1.s.y)
  15 ##
  16         arrow from U1.s to C1.n
  17         arrow from C1.s to B1.n
  18         arrow from B1.e to B8.w
  19         arrow from B8.e to B2.w
  20         arrow from B2.e to B9.w
  21         arrow from B9.e to B3.w
  22         arrow from B3.n to C2.s
  23         arrow from C2.n to U2.s
  24 ##
  25 B4:     box width B3.e.x+linewid/3-(B1.w.x-linewid/3) \
  26             height 4*boxht \
  27             with .c at B2.c
  28         move to (B4.n.x, B4.n.y-lineht/2); "\MTS/"
  29 ##
  30         move to (U1.s.x, (U1.s.y+C1.n.y)/2); \
  31             "\ name $\longrightarrow$ address" ljust
  32         move to (B1.n.x, (B1.n.y+B4.n.y)/2); \
  33                 "\ address $\longrightarrow$ route" ljust
  34 ##
  35 .PE