summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m4
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m4')
-rw-r--r--Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m421
1 files changed, 21 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m4 b/Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m4
new file mode 100644
index 00000000000..65a181f214a
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/circuit-macros/examples/dpv/quickDPV.m4
@@ -0,0 +1,21 @@
+.PS # Pic input begins with .PS
+# quickDPV.m4
+cct_init # Set defaults
+
+elen = 0.75 # Variables are allowed; default units are inches
+move right 0.4
+Origin: Here # Position names are capitalized
+ svgLink(SourcesDPV.svg,source(up_ elen))
+ llabel(-,svg_it(v`'svg_sub(s)),+)
+ svgLink(ResistorsDPV.svg,resistor(right_ elen)); rlabel(,svg_it(R),)
+ dot
+ { # Save current position and direction
+ capacitor(down_ to (Here,Origin)) #(Here,Origin) = (Here.x,Origin.y)
+ rlabel(+,svg_it(v),-); llabel(,svg_it(C))
+ dot
+ } # Restore position and direction
+ line right_ elen*2/3
+ {move right 0.2}
+ inductor(down_ Here.y-Origin.y); rlabel(,svg_it(L),); b_current("svg_it(i)")
+ line to Origin
+.PE # Pic input ends