diff options
author | Karl Berry <karl@freefriends.org> | 2024-05-30 19:57:12 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2024-05-30 19:57:12 +0000 |
commit | 331c40fd5e3111d98316166d251fc1629235c6bc (patch) | |
tree | 959465117fea26ec7e231696481f4a134e303ad9 /Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4 | |
parent | 63e60afe56af880c4a7793f19b7de582f889d25c (diff) |
circuit_macros (30may24)
git-svn-id: svn://tug.org/texlive/trunk@71389 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4')
-rw-r--r-- | Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4 | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4 b/Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4 deleted file mode 100644 index a304d7359b6..00000000000 --- a/Master/texmf-dist/doc/latex/circuit-macros/examples/ex17.m4 +++ /dev/null @@ -1,43 +0,0 @@ -.PS -# ex17.m4 -cct_init - -[ -nrows = 4 -ncols = 9 -linewid = linewid*0.6 # everything smaller -define(`elen_',linewid) # shorter default length - - for j = 1 to nrows do { - { for i = 1 to ncols do { - Point_(-120) resistor - Point_( 0) inductor - Point_( 120) capacitor - if i < ncols then {Point_(0) diode} } - } - Point_(-120) move to rvec_(elen_,0) - { for i = 1 to ncols do { - Point_(-60) capacitor - Point_( 60) resistor } - } - Point_(-60) move to rvec_(elen_,0) - } - Point_(0) for i = 1 to ncols-1 do { inductor } -] - -[ # an exercise of the `parallel_' macro: - down_ # for labelling - Point_(-80) # skew current direction - - parallel_(Sep=1.75*dimen_; - parallel_( - `capacitor(,C); rlabel(,,C_2)', - `resistor; rlabel(,R_2)' ), - parallel_( - `resistor; rlabel(,R_1); move to rvec_(-dimen_/5,0) - inductor(,W); rlabel(,L_1)', - `reversed(`source',to rvec_(elen_,0),V,sourcerad_*2.5); rlabel(,v_s)' ) - ) - -] with .sw at last [].se+(elen_,0) -.PE |