|
|
1.1 root 1: .PS
2: .ps 20
3: ## figure A-15
4:
5: boxwid = 2*boxwid
6:
7: B1: box "user"
8: B2: box with .n at (B1.s.x,B1.s.y-boxht) width 1.5*boxwid height 6*boxht
9: B3: box "user" "application" \
10: with .n at (B2.n.x,B2.n.y-(boxht/3)) width 1.25*boxwid height 1.5*boxht
11: B4: box "presentation" with .sw at B2.sw width 1.5*boxwid
12: B5: box "acse" with .e at (B3.e.x,B4.ne.y+(B3.se.y-B4.ne.y)/3) \
13: width .5*boxwid height .75*boxht
14: B6: box invis "$\ldots$" with .nw at B2.sw width 1.5*boxwid
15: B7: box "rose" with .e at (B5.n.x,B3.sw.y-(B3.sw.y-B4.nw.y)/3) \
16: width .75*boxwid height .75*boxht
17: ##
18: L1: line <-> from (B1.sw.x-(B1.sw.x-B1.s.x)/2,B1.s.y) \
19: to (B1.sw.x-(B1.sw.x-B1.s.x)/2,B3.n.y)
20: L2: line <-> from (B1.se.x-(B1.se.x-B1.s.x)/2,B1.s.y) \
21: to (B1.se.x-(B1.se.x-B1.s.x)/2,B3.n.y)
22: L3: line <-> from (B1.sw.x-(B1.sw.x-B1.s.x)/2,B3.s.y) \
23: to (B1.sw.x-(B1.sw.x-B1.s.x)/2,B7.n.y)
24: L4: line <-> from (B1.se.x-(B1.se.x-B1.s.x)/2,B3.s.y) \
25: to (B1.se.x-(B1.se.x-B1.s.x)/2,B7.n.y)
26: L5: line <-> from (B1.se.x-(B1.se.x-B1.s.x)/2,B5.s.y) \
27: to (B1.se.x-(B1.se.x-B1.s.x)/2,B4.n.y)
28: L6: line <-> from (B1.se.x-(B1.se.x-B1.s.x)/2,B7.s.y) \
29: to (B1.se.x-(B1.se.x-B1.s.x)/2,B5.n.y)
30: L7: line <-> from (B1.sw.x-(B1.sw.x-B1.s.x)/2,B7.s.y) \
31: to (B1.sw.x-(B1.sw.x-B1.s.x)/2,B4.n.y)
32:
33:
34:
35:
36: #B1: box "user" width 3*boxwid
37: #B2: box "PCI" with .ne at (B1.sw.x, B1.sw.y-lineht)
38: #B3: box "PDU" with .nw at (B2.sw.x, B2.sw.y-lineht) width 4*boxwid
39: # line from B1.s to (B1.s.x, B3.n.y)
40: # line from B2.s to (B2.s.x, B3.n.y)
41: #B4: box "ICI" with .e at B3.w dashed
42: #B5: box "IDU" with .nw at (B4.sw.x, B4.sw.y-lineht) width 5*boxwid dashed
43: #B6: box "ICI" with .nw at (B5.sw.x, B5.sw.y-lineht) dashed
44: #B7: box "SDU" with .w at B6.e width 4*boxwid
45: ###
46: # line dashed from B5.e to (B5.e.x+3*linewid, B5.e.y)
47: # move to (B5.e.x+3*linewid, B5.n.y); "layer-N" rjust
48: # line dashed from B5.w to (B5.w.x-3*linewid, B5.w.y)
49: # move to (B5.e.x+3*linewid, B5.s.y); "layer-(N-1)" rjust
50: ##
51: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.