|
|
1.1 root 1: .PS
2: .ps 20
3: ##
4: boxht = boxht/2
5: boxwid = boxwid/2
6: define boxit @
7: $1: box with .w at last box.e $2
8: @
9: ## figureE-17
10: B01: box "1" invis
11: boxit(B02, "2" invis)
12: boxit(B03, "3" invis)
13: boxit(B04, "4" invis)
14: boxit(B05, "5" invis)
15: boxit(B06, "6" invis)
16: boxit(B07, "7" invis)
17: B10: box "1" invis with .ne at B01.sw
18: B20: box "2" invis with .n at last box.s
19: B30: box "3" invis with .n at last box.s
20: B40: box "4" invis with .n at last box.s
21: B50: box "5" invis with .n at last box.s
22: B60: box "6" invis with .n at last box.s
23: B70: box "7" invis with .n at last box.s
24: ##
25: B11: box "$\surd$" with .n at B01.s
26: boxit(B12, )
27: boxit(B13, "$\surd$")
28: boxit(B14, "$\surd$")
29: boxit(B15, "$\surd$")
30: boxit(B16, )
31: boxit(B17, )
32: ##
33: B21: box with .n at B11.s
34: boxit(B22, "$\surd$")
35: boxit(B23, )
36: boxit(B24, )
37: boxit(B25, )
38: boxit(B26, )
39: boxit(B27, )
40: ##
41: B31: box "$\surd$" with .n at B21.s
42: boxit(B32, )
43: boxit(B33, "$\surd$")
44: boxit(B34, "$\surd$")
45: boxit(B35, "$\surd$")
46: boxit(B36, )
47: boxit(B37, )
48: ##
49: B41: box "$\surd$" with .n at B31.s
50: boxit(B42, )
51: boxit(B43, "$\surd$")
52: boxit(B44, "$\surd$")
53: boxit(B45, "$\surd$")
54: boxit(B46, )
55: boxit(B47, )
56: ##
57: B51: box "$\surd$" with .n at B41.s
58: boxit(B52, )
59: boxit(B53, "$\surd$")
60: boxit(B54, "$\surd$")
61: boxit(B55, "$\surd$")
62: boxit(B56, )
63: boxit(B57, )
64: ##
65: B61: box with .n at B51.s
66: boxit(B62, )
67: boxit(B63, )
68: boxit(B64, )
69: boxit(B65, )
70: boxit(B66, "$\surd$")
71: boxit(B67, )
72: ##
73: B71: box with .n at B61.s
74: boxit(B72, )
75: boxit(B73, )
76: boxit(B74, )
77: boxit(B75, )
78: boxit(B76, )
79: boxit(B77, "$\surd$")
80: ##
81: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.