diff options
author | Karl Berry <karl@freefriends.org> | 2022-11-30 20:30:02 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2022-11-30 20:30:02 +0000 |
commit | 8624a5d970faf95011e4ab23ae9e567bc93a8575 (patch) | |
tree | feec6bb6fe5a35bbece9b29e82b64e2b947294c4 /Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4 | |
parent | a63a0445b5ba9dafe9858cdc6f18f3b3711b35b1 (diff) |
circuit_macros (30nov22)
git-svn-id: svn://tug.org/texlive/trunk@65149 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4')
-rw-r--r-- | Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4 | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4 b/Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4 deleted file mode 100644 index ca15109fa98..00000000000 --- a/Master/texmf-dist/doc/latex/circuit-macros/examples/svg/ex15SVG.m4 +++ /dev/null @@ -1,40 +0,0 @@ -.PS -# ex15.m4 -gen_init - -[ -n = 10; r = 1 -for i = 1 to n-1 do { - for j = i+1 to n do { - line from rect_(r,i*twopi_/n) to rect_(r,j*twopi_/n) - } - } - ] -[ - linethick = 2.5 - lt = linethick bp__ - crad = 1.0 - C: circle rad crad - g = 0.65 - D: C+(Rect_(crad*g,110)) - rm = crad+distance(C,D) - for r=lt to rm by 2*lt do { - if r < (1-g)*crad then { circle rad r at D thick r/rm*linethick } \ - else { arc cw from Cintersect(D,r,C,crad) \ - to Cintersect(D,r,C,crad,R) with .c at D thick r/rm*linethick } - } - linethick = 1.5 - lt = linethick bp__ - C: circle invis rad crad with .w at C.e+(0.1,0) - D: C+(Rect_(crad*g,110)) - rm = crad+distance(C,D) - for r=lt to rm by lt do { - u = (1-r/rm) - if r < (1-g)*crad then { rgbdraw(u,u,u,circle rad r at D) } \ - else { rgbdraw(u,u,u,arc cw from Cintersect(D,r,C,crad) \ - to Cintersect(D,r,C,crad,R) with .c at D) } - } - circle rad C.rad at C - ] with .w at last [].e+(0.1,0) - -.PE |