summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/examples/svg/GroundsSVG.m4
blob: c1a9589f2d8e611f3b2fc09bb8c305e3c01b123f (plain)
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
.PS
# `GroundsSVG.m4'
cct_init(svg_font(sans-serif,11bp__))

sep = 0.65
Ground: ground
   move right sep
GT: ground(,T)
   move right sep
GF: ground(,,F)
sep = 0.55
   move right sep
GE: ground(,,E)
   move right sep

B: Here+(0,-0.5)
D: B+(0,11bp__)
 { "`ground'" wid 36bp__ at (Ground,B)
   "`ground'(,T)" at (GT,B)+(0,11bp__)
   "(,,F)" at (GF,B)
   "(,,E)" at (GE,D)}


GS: ground(,,S)
   move right sep
GS90: [ground(,,S,90) ] with .n at Here
   move right sep from GS90.n
GQ: ground(,,Q)
   move right sep
GL: ground(,,L)
   move right sep
GP: ground(,,P)
   move right sep
GPA: ground(,T,PA)

C: Here+(0,-0.5)
E: C+(0,11bp__)
   "(,,S)" at (GS,C)
   "(,,S,90)" at (GS90,E)
   "(,,Q)" at (GQ,C)
   "(,,L)" at (GL,E)
   "(,,P)" at (GP,C)
   "(,T,PA)" wid 32bp__ at (GPA,E)

 command "</g>" # end font
.PE