1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
.PS
# Arresters.m4
cct_init
sep = 0.2
R1: [
arrester
{`"\tt arrester"' at last line.c+(0,-0.2)}
move sep
arrester(,G)
{`"\tt arrester(,G)"' at last line.c+(0,-0.2)}
move sep
arrester(,g)
{`"\tt ...(,g)"' at last line.c+(0,-0.2)}
move sep
arrester(,M)
{`"\tt \ldots(,M)"' at last line.c+(0,-0.2)}
move sep
arrester(,C)
{`"\tt \ldots(,C)"' at last line.c+(0,-0.2)}
move sep
arrester(,A)
{`"\tt \ldots(,A)"' at last line.c+(0,-0.2)}
]
R2: [
arrester(,H)
{`"\tt \ldots(,H)"' at last line.c+(0,-0.2)}
move sep
arrester(,HR)
{`"\tt \ldots(,HR)"' at last line.c+(0,-0.2)}
move sep
arrester(,P)
{`"\tt \ldots(,P)"' at last line.c+(0,-0.2)}
move sep
arrester(,s)
{`"\tt \ldots(,s)"' at last line.c+(0,-0.2)}
move sep
arrester(,F)
{`"\tt \ldots(,F)"' at last line.c+(0,-0.2)}
move sep
arrester(,S)
{`"\tt \ldots(,S)"' at last line.c+(0,-0.2)}
] with .nw at R1.sw+(0,-0.2)
define(`Dlabels',
`{ thinlines_
arrow <- from A.A up 0.1 left 0.1; "\sl A" rjust
arrow <- from A.B up 0.1 right 0.1; "\sl B" ljust
arrow <- from A.G up 0.05 right 0.15; "\sl G" ljust
thicklines_ }')
[
arrester(,E)
{`"\tt \ldots(,E)"' at last line.c+(0,-0.25)}
move sep
A: arrester(,DE)
{`"\tt \ldots(,DE)"' at last [].s+(0,-0.1)}
Dlabels
move sep*3
A: arrester(,DS)
{`"\tt \ldots(,DS)"' at last [].s+(0,-0.1)}
Dlabels
move sep*3
A: arrester(,DEL)
{`"\tt \ldots(,DEL)"' at last [].s+(0,-0.1)}
Dlabels
move sep*3
A: arrester(,DSL)
{`"\tt \ldots(,DSL)"' at last [].s+(0,-0.1)}
Dlabels
] with .nw at R2.sw+(0,-0.2)
.PE
|
