|
|
1.1 root 1: .PS 5.5i
2: .ps 20
3: ## figure T-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/2) \
33: width (B2.e.x-B3.w.x)
34: line from B5.n to B6.s
35: B61: box "APPLICATION SERVICE" "ELEMENTS" with .s at (B6.n.x, B6.n.y+lineht/2) \
36: width (B2.e.x-B3.w.x)
37: line from B6.n to B61.s
38: ##
39: dist = ((B2.e.x-B3.w.x)-4*boxwid) / 3
40: B7: box "MHS" with .sw at (B61.nw.x, B61.nw.y+lineht/2)
41: line from B7.s to (B7.s.x, B7.s.y-lineht/2)
42: B8: box "FTAM" with .w at (B7.e.x+dist, B7.e.y)
43: line from B8.s to (B8.s.x, B8.s.y-lineht/2)
44: B9: box "VT" with .w at (B8.e.x+dist, B8.e.y)
45: line from B9.s to (B9.s.x, B9.s.y-lineht/2)
46: B10: box "DS" with .w at (B9.e.x+dist, B9.e.y)
47: line from B10.s to (B10.s.x, B10.s.y-lineht/2)
48: ##
49: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.