|
|
1.1 root 1: .PS
2: .ps 20
3: boxwid = 3*boxwid
4: define boxit @
5: box "$1" with .n at ($2.s.x, $2.s.y-lineht/2)
6: line from $2.s to last box.n
7: @
8: ## figure 5
9: B1: box "APPLICATION"
10: B2: boxit(PRESENTATION,B1)
11: B3: boxit(SESSION,B2)
12: B5: box with .nw at (B1.ne.x+linewid, B1.ne.y) height B1.ne.y-B3.se.y \
13: width boxht/6 shaded
14: move to B5.e; "\ PURE OSI" ljust
15: B4: box "OSI TRANSPORT" "" "SERVICE IN A" "" "non-OSI NETWORK" \
16: with .n at (B3.s.x, B3.s.y-lineht/2) height 3*boxht
17: line from B3.s to B4.n
18: ##
19: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.