summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/doc/QTrans.m4
blob: 95039e6f1c7c3edd5b7dd4a00e7b42d972a89561 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
.PS
#QTrans.m4
cct_init
elen = 0.75
  Origin: Here
  Vs: source(up_ elen,S); llabel(-,V_s,+)
     resistor(right_ elen);  rlabel(,R_s)
     dot
     { capacitor(down_ to (Here,Origin))
       rlabel(+,V,-); llabel(,{1\over{j\omega C}},)
       dot }
    arrowline(right_ elen*2/3); llabel(,I)
  T1: transformer(down_ Vs.len,,6,,4) with .P1 at Here
    "$T1$" at last [].n above
    line from T1.P2 to Origin
    line from T1.S1 up_ to (T1.S1,Vs.end) then right_ elen*2/3
    resistor(down_ Vs.len); rlabel(,R_L); b_current(I_L,rjust)
    line to (T1.S2,Here) then to T1.S2
.PE