summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/4-5-4.mp
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/lgc2/4-5-4.mp')
-rw-r--r--info/examples/lgc2/4-5-4.mp17
1 files changed, 17 insertions, 0 deletions
diff --git a/info/examples/lgc2/4-5-4.mp b/info/examples/lgc2/4-5-4.mp
new file mode 100644
index 0000000000..f454dfcbea
--- /dev/null
+++ b/info/examples/lgc2/4-5-4.mp
@@ -0,0 +1,17 @@
+% --- start of displayed preamble in the book ---
+input makecirc;
+initlatex("");
+% --- end of displayed preamble in the book ---
+defaultfont:="ptmr8r";
+warningcheck:=0;
+beginfig(1)
+resistor.a(origin,normal,90,"R","10\ohm");
+centerto.A(R.a.l,R.a.r,2cm,ind);
+inductor.a(A,Up,90,"L","");
+z1=(xpart L.a.r, ypart R.a.r);
+centreof.B(R.a.r,z1,cap);
+capacitor.a(c.B,normal,phi.B,"C","");
+wire(R.a.r,C.a.l,nsq);wire(C.a.r,L.a.r,nsq);
+wire(L.a.l,R.a.l,nsq);
+endfig;
+end;