diff options
author | Norbert Preining <norbert@preining.info> | 2021-06-04 03:02:48 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2021-06-04 03:02:48 +0000 |
commit | a5ae129f3aa3a3a0aeaa21c55b75a1d543fe4111 (patch) | |
tree | fe5e1e212aec203e668df8581a17374cdde352a1 /graphics/circuit_macros/examples/svg/DiniSVG.m4 | |
parent | d231c6331f53a048d29c2f847254a9f56d5ee2dd (diff) |
CTAN sync 202106040302
Diffstat (limited to 'graphics/circuit_macros/examples/svg/DiniSVG.m4')
-rw-r--r-- | graphics/circuit_macros/examples/svg/DiniSVG.m4 | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/graphics/circuit_macros/examples/svg/DiniSVG.m4 b/graphics/circuit_macros/examples/svg/DiniSVG.m4 index 5631a4822f..1846917a4a 100644 --- a/graphics/circuit_macros/examples/svg/DiniSVG.m4 +++ b/graphics/circuit_macros/examples/svg/DiniSVG.m4 @@ -46,10 +46,10 @@ define(`Dini', du = ur/ugrid/2 dv = vr/vgrid/2 for i=0 to n do { - NE: project(Dini(ciu[ix[i]]+du,civ[ix[i]]+dv)) - SE: project(Dini(ciu[ix[i]]+du,civ[ix[i]]-dv)) - SW: project(Dini(ciu[ix[i]]-du,civ[ix[i]]-dv)) - NW: project(Dini(ciu[ix[i]]-du,civ[ix[i]]+dv)) + NE: Project(Dini(ciu[ix[i]]+du,civ[ix[i]]+dv)) + SE: Project(Dini(ciu[ix[i]]+du,civ[ix[i]]-dv)) + SW: Project(Dini(ciu[ix[i]]-du,civ[ix[i]]-dv)) + NW: Project(Dini(ciu[ix[i]]-du,civ[ix[i]]+dv)) f = (-cos(ciu[ix[i]])+1)/2 g = ( sin(ciu[ix[i]])+1)/2 line from NE to SE then to SW then to NW then to NE \ @@ -174,9 +174,9 @@ array2(h,m4inx,53,54,55,58,59,57) } for i=1 to n do { for j=1 to 6 do { x[j]=h[ih[i],j] } - line from project((v[x[1],1]),(v[x[1],2]),(v[x[1],3]))\ - for_(2,6,1,`to project((v[x[m4x],1]),(v[x[m4x],2]),(v[x[m4x],3]))\')\ - to project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) thick 0.2 fill_(0.95) + line from Project((v[x[1],1]),(v[x[1],2]),(v[x[1],3]))\ + for_(2,6,1,`to Project((v[x[m4x],1]),(v[x[m4x],2]),(v[x[m4x],3]))\')\ + to Project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) thick 0.2 fill_(0.95) } m = 0 for i=1 to 12 do { # Visible pentagons @@ -185,9 +185,9 @@ array2(h,m4inx,53,54,55,58,59,57) } for i=1 to m do { for j=1 to 5 do { x[j]=p[ip[i],j] } - line from project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) \ - for_(2,5,1,`to project((v[x[m4x],1]),(v[x[m4x],2]),(v[x[m4x],3]))\')\ - to project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) thick 0.2 fill_(0) + line from Project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) \ + for_(2,5,1,`to Project((v[x[m4x],1]),(v[x[m4x],2]),(v[x[m4x],3]))\')\ + to Project((v[x[1],1]),(v[x[1],2]),(v[x[1],3])) thick 0.2 fill_(0) } ] scaled 2.5 with .sw at last [].se+(1,0) .PE |