|
|
1.1 root 1: .PS
2: .ps 20
3: ## figure 5
4: B1: box "CLNP"
5: C1: box invis with .n at (B1.s.x, B1.s.y-lineht) "$\cdots$"
6: C2: box invis with .n at (B1.s.x-(boxwid+linewid), B1.s.y-lineht) \
7: "subnetwork$_{1}$"
8: C3: box invis with .n at (B1.s.x+(boxwid+linewid), B1.s.y-lineht) \
9: "subnetwork$_{N}$"
10: line from B1.s to C1.n
11: line from (B1.s.x-boxwid/4, B1.s.y) to C2.n
12: line from (B1.s.x+boxwid/4, B1.s.y) to C3.n
13: ##
14: B2: box "TP4" with .s at (B1.n.x, B1.n.y+lineht)
15: line from B1.n to B2.s
16: ##
17: B3: box "TP0 $\ldots$ TP3" width 2*boxwid \
18: with .e at (B2.w.x-3*linewid, B2.w.y)
19: B4: box "\~{}X.25" with .n at (B3.s.x, B3.s.y-lineht)
20: line from B3.s to B4.n
21: line dashed down from B4.s
22: ##
23: line from (B3.w.x-linewid/2, B3.n.y+lineht/2) \
24: to (B2.e.x+linewid/2, B2.n.y+lineht/2) dashed
25: move to (B2.e.x+linewid/2, B2.n.y+lineht/2); "\ OSI TS" ljust
26: line from B2.n to (B2.n.x, B2.n.y+lineht/2)
27: line from B3.n to (B3.n.x, B3.n.y+lineht/2)
28: ##
29: B5: box "SESSION" with .s at ((B3.w.x+B2.e.x)/2, B3.n.y+lineht) \
30: width (B2.e.x-B3.w.x)
31: line from (B5.s.x, B3.n.y+lineht/2) to B5.s
32: B6: box "PRESENTATION" with .s at (B5.n.x, B5.n.y+lineht) \
33: width (B2.e.x-B3.w.x)
34: line from B5.n to B6.s
35: ##
36: dist = ((B2.e.x-B3.w.x)-4*boxwid) / 3
37: B7: box "MHS" with .sw at (B6.nw.x, B6.nw.y+lineht)
38: line down from B7.s
39: B8: box "FTAM" with .w at (B7.e.x+dist, B7.e.y)
40: line down from B8.s
41: B9: box "VT" with .w at (B8.e.x+dist, B8.e.y)
42: line down from B9.s
43: B10: box "DS" with .w at (B9.e.x+dist, B9.e.y)
44: line down from B10.s
45: ##
46: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.