diff options
Diffstat (limited to 'info/examples/lgc2/4-5-8.mp')
-rw-r--r-- | info/examples/lgc2/4-5-8.mp | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/info/examples/lgc2/4-5-8.mp b/info/examples/lgc2/4-5-8.mp new file mode 100644 index 0000000000..13a6dd5a64 --- /dev/null +++ b/info/examples/lgc2/4-5-8.mp @@ -0,0 +1,23 @@ +% --- start of displayed preamble in the book --- +input makecirc; +initlatex("\usepackage{amsmath,amssymb}"); +% --- end of displayed preamble in the book --- +defaultfont:="ptmr8r"; +warningcheck:=0; +beginfig(1) +source.a(origin,AC,90,"v",""); +junction.a(S.a.p+(3cm,1cm),"")(top); +diode.a(J.a,normal,-45,pinA,"D_1",""); +diode.b(D.a.K,normal,-135,pinK,"D_2",""); +diode.c(D.b.A,normal,135,pinK,"D_3",""); +diode.d(D.c.A,normal,45,pinA,"D_4",""); +junction.b(D.b.A,"")(bot); +centerto.A(S.a.n,S.a.p)(5cm,imp); +impedance.a(A,90,"Z_L",""); +wireU(S.a.p,D.a.A,1.5cm,udsq); +wireU(S.a.n,D.b.A,-1.5cm,udsq); +wire(D.a.K,Z.a.r,rlsq); +wire(Z.a.l,Z.a.l+(0,-4mm),nsq); +wireU(Z.a.l+(0,-4mm),D.d.A,-4cm,rlsq); +endfig; +end; |