diff options
Diffstat (limited to 'Master/texmf/doc/asymptote/examples/truncatedIcosahedron.asy')
-rw-r--r-- | Master/texmf/doc/asymptote/examples/truncatedIcosahedron.asy | 68 |
1 files changed, 0 insertions, 68 deletions
diff --git a/Master/texmf/doc/asymptote/examples/truncatedIcosahedron.asy b/Master/texmf/doc/asymptote/examples/truncatedIcosahedron.asy deleted file mode 100644 index e4d07a49e5b..00000000000 --- a/Master/texmf/doc/asymptote/examples/truncatedIcosahedron.asy +++ /dev/null @@ -1,68 +0,0 @@ -import graph3; - -size(200); - -defaultrender.merge=true; - -real c=(1+sqrt(5))/2; - -triple[] z={(c,1,0),(-c,1,0),(-c,-1,0),(c,-1,0)}; -triple[] x={(0,c,1),(0,-c,1),(0,-c,-1),(0,c,-1)}; -triple[] y={(1,0,c),(1,0,-c),(-1,0,-c),(-1,0,c)}; - -triple[][] Q={ - {(c,1,0),(1,0,-c),(0,c,-1),(0,c,1),(1,0,c),(c,-1,0)}, - {(-c,1,0),(0,c,1),(0,c,-1),(-1,0,-c),(-c,-1,0),(-1,0,c)}, - {(-c,-1,0),(-c,1,0),(-1,0,-c),(0,-c,-1),(0,-c,1),(-1,0,c)}, - {(c,-1,0),(c,1,0),(1,0,c),(0,-c,1),(0,-c,-1),(1,0,-c)}, - {(0,c,1),(0,c,-1),(-c,1,0),(-1,0,c),(1,0,c),(c,1,0)}, - {(0,-c,1),(0,-c,-1),(-c,-1,0),(-1,0,c),(1,0,c),(c,-1,0)}, - {(0,-c,-1),(0,-c,1),(c,-1,0),(1,0,-c),(-1,0,-c),(-c,-1,0)}, - {(0,c,-1),(0,c,1),(c,1,0),(1,0,-c),(-1,0,-c),(-c,1,0)}, - {(1,0,c),(-1,0,c),(0,-c,1),(c,-1,0),(c,1,0),(0,c,1)}, - {(1,0,-c),(-1,0,-c),(0,-c,-1),(c,-1,0),(c,1,0),(0,c,-1)}, - {(-1,0,-c),(1,0,-c),(0,c,-1),(-c,1,0),(-c,-1,0),(0,-c,-1)}, - {(-1,0,c),(1,0,c),(0,c,1),(-c,1,0),(-c,-1,0),(0,-c,1)} -}; - -real R=abs(interp(Q[0][0],Q[0][1],1/3)); - -triple[][] P; -for(int i=0; i < Q.length; ++i) { - P[i]=new triple[] ; - for(int j=0; j < Q[i].length; ++j) { - P[i][j]=Q[i][j]/R; - } -} - -for(int i=0; i < P.length; ++i) { - for(int j=1; j < P[i].length; ++j) { - triple C=P[i][0]; - triple A=P[i][j]; - triple B=P[i][j % 5+1]; - triple[] sixout=new - triple[] {interp(C,A,1/3),interp(C,A,2/3),interp(A,B,1/3),interp(A,B,2/3), - interp(B,C,1/3),interp(B,C,2/3)}; - triple M=(sum(sixout))/6; - triple[] sixin=sequence(new triple(int k) { - return interp(sixout[k],M,0.1); - },6); - draw(surface(reverse(operator--(...sixout)--cycle)^^ - operator--(...sixin)--cycle,planar=true),magenta); - } -} - -for(int i=0; i < P.length; ++i) { - triple[] fiveout=sequence(new triple(int k) { - return interp(P[i][0],P[i][k+1],1/3); - },5); - triple M=(sum(fiveout))/5; - triple[] fivein=sequence(new triple(int k) { - return interp(fiveout[k],M,0.1); - },5); - draw(surface(reverse(operator--(...fiveout)--cycle)^^ - operator--(...fivein)--cycle,planar=true),cyan); -} - - - |