|
|
1.1 root 1: \def\pprotocol{[ISO/IEC 8823]}
2: \def\sservice{[ISO/IEC 8326]}
3: \def\pservice{[ISO/IEC 8822]}
4: .PS 5.0i
5: lineht = 3*lineht/2
6: ## figure A-23
7: B1: box "\sf presentation" "\sf user"
8: line down from B1.s
9: B3: box "\sf presentation" "\sf entity"
10: line down from B3.s
11: B5: box invis
12: ##
13: B2: box "\sf presentation" "\sf user" with .w at (B1.e.x+3*linewid, B1.e.y)
14: line down from B2.s
15: B4: box "\sf presentation" "\sf entity"
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: box invis with .w at (B2.e.x, (B2.s.y+B4.n.y)/2) \
22: "\sf \begin{tabular}{r}presentation service\\ \pservice\end{tabular}"
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: box invis with .w at (B4.e.x, (B4.s.y+B6.n.y)/2) \
27: "\sf \begin{tabular}{r}session service\\ \sservice\end{tabular}"
28: ##
29: line <-> from B3.e to B4.w dashed "\sf presentation protocol" "\sf\pprotocol"
30: ##
31: B7: box "\sf session provider" with .nw at B5.nw width (B6.ne.x-B5.nw.x)
32: ##
33: B8: box invis "\sf presentation service access point" \
34: with .n at ((B1.c.x+B2.c.x)/2, B1.s.y) \
35: height boxht/2 width 3*boxwid/2
36: arrow from (B8.sw.x, B8.sw.y+boxht/10) \
37: to (B3.n.x+linewid/12, (B1.s.y+B3.n.y)/2+lineht/20)
38: arrow from (B8.se.x, B8.se.y+boxht/10) \
39: to (B4.n.x-linewid/12, (B2.s.y+B4.n.y)/2+lineht/20)
40: ##
41: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.