File: AntennasDPV.m4

package info (click to toggle)
circuit-macros 10.1.4-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 6,532 kB
  • sloc: makefile: 909; sh: 49
file content (40 lines) | stat: -rw-r--r-- 1,090 bytes parent folder | download | duplicates (6)
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
.PS
# `Antennas.m4'
cct_init(svg_font(sans-serif,11bp__))
  textoffset = 3bp__

  define(`elen_',elen_*0.9)
  B: Here
  A: antenna
       "T" below at A.T
       "`antenna'" wid 0.6 at A.n above
  A: antenna(at A.T+(elen_,0),T)
       "T" below at A.T
       "`(,T)'" at A.n above
  A: antenna(at A.T+(elen_,0),,L)
       "T1" below rjust at A.T1
       "T2" below ljust at A.T2
       "`(,,L)'" at A.n above
  A: antenna(at A.T+(elen_,0),T,L)
       "T1" below rjust at A.T1
       "T2" below ljust at A.T2
       "`(,T,L)'" at A.n above
  A: antenna(at A.T+(elen_,0),,T)
       "T" below at A.T
       "`(,,T)'" at A.n above
  A: antenna(at A.T+(elen_,0),,S)
       "T1" below rjust at A.T1
       "T2" below ljust at A.T2
       "`(,,S)'" at A.n above
  A: antenna(at A.T+(elen_,0),,D)
       "T1" below rjust at A.T1
       "T2" below ljust at A.T2
       "`(,,D)'" at A.n above
  A: antenna(at A.T+(elen_,0),,P)
       "T" below at A.T
       "`(,,P)'" at A.n above
  A: antenna(at A.T+(elen_,0),,F)
       "T" below at A.T
       "`(,,F)'" at A.n above
 command "</g>" # end font
.PE