Commit | Line | Data |
---|---|---|
3b5b17f7 C |
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 |