|
|
1.1 root 1: \def\tpservice{[ISO 8073]}
2: \def\tcpservice{[MIL 1778]}
3: .PS 6i
4: .ps 20
5: lineht = 3*lineht/2
6: ## figure 5
7: B1: box "TS-user"
8: line down from B1.s
9: B3: box "TS-provider" "(client)"
10: line down from B3.s
11: B5: box invis
12: ##
13: B2: box "TS-user" with .w at (B1.e.x+3*linewid, B1.e.y)
14: line down from B2.s
15: B4: box "TS-provider" "(server)"
16: line down from B4.s
17: B6: box invis
18: ##
19: line dashed from (B1.w.x-linewid/2, (B1.s.y+B3.n.y)/2) \
20: to (B2.e.x+linewid/2, (B2.s.y+B4.n.y)/2)
21: move to (B2.e.x, (B2.s.y+B4.n.y)/2) \
22: "\begin{tabular}{r}TSAP interface\\ \tpservice\end{tabular}" ljust
23: ##
24: line dashed from (B3.w.x-linewid/2, (B3.s.y+B5.n.y)/2) \
25: to (B4.e.x+linewid/2, (B4.s.y+B6.n.y)/2)
26: move to (B4.e.x, (B4.s.y+B6.n.y)/2) \
27: "\begin{tabular}{r}TCP interface\\ \tcpservice\end{tabular}" ljust
28: ##
29: line from B3.e to B4.w dashed \
30: "{\em magic box\/} protocol" ""
31: ##
32: B7: box "The TCP" with .nw at B5.nw width (B6.ne.x-B5.nw.x)
33: ##
34: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.