/*Surface de Clebsch ; Equation de hunt - Double-six 81*(x^3+y^3+z^3)-189*(x^2*y+x^2*z+y^2*x+y^2*z+z^2*x+z^2*y)+54*x*y*z+ 126*(x*y+x*z+y*z)-9*(x^2+y^2+z^2)-9*(x+y+z)+1 =0 numa := [17, 5, 27, 23, 15, 9] numb := [16, 4, 26, 22, 14, 8] */ #declare a=1 ; #include "colors.inc" #declare a=4 ; camera { orthographic location <-2.5,0.6,-3>*0.75 look_at<0,0.2,0> } light_source { <-4,5,-10> color White} light_source { <-5,10,-20> color White shadowless} light_source { <3,10,-10> color rgb <0.8,0.8,1>*0.5 shadowless} box {<-20,-1.3,-20>,<5,20,5> pigment {SkyBlue} rotate <0,5, 0> } union{ // axes ---------------------- union{ #declare g=0.42 ; #declare r1=0.003;//6seul 0.003 #declare k=4;// longueur fleche=k*r1 #declare co=1.8;// rayon base=co*r1 cylinder{ <-g/2,0,0>,,r1 } cone{ ,co*r1,,0 } cylinder{ <0,-g/2,0>,<0,g,0>,r1 } cone{ <0,g,0>,co*r1,<0,g+k*r1,0>,0 } cylinder{<0,0,-g/2>,<0,0,g>,r1 } cone{ <0,0,g>,co*r1,<0,0,g+k*r1>,0 } pigment { Yellow*1.5 } }/**/ // fin des axes union{ // Double-six #declare r=0.004 ; //6seul 0.006;// #declare b=4; union { // ai du double-six [17, 5, 27, 23, 15, 9] cylinder{< 1.309*b+.637e-1,2.927*b+.2696,-1.*b >,<-1.309*b+.637e-1,-2.927*b+.2696,b > ,r } //9 cylinder{< -1.*b,-.3333*b+.1111,0. >, ,r } //23 cylinder{< .342*b+.9217e-1,-.4472*b-.569e-1,-1.*b >,<-.342*b+.9217e-1,.4472*b-.569e-1,b > ,r } //17 cylinder{< -.3333*b+.1111,0.,-1.*b >,<.3333*b+.1111,0.,b > ,r } //15 cylinder{< 0.,-3.*b-.3333,-1.*b >,<0.,3.*b-.3333,b > ,r } //5 cylinder{< -2.236*b+.1273,.764*b+.49e-1,-1.*b >,<2.236*b+.1273,-.764*b+.49e-1,b > ,r } //27 pigment { Green} finish{ specular 0.7 diffuse 0.2 reflection 0.5} } union { // bi du double-six [16, 4, 26, 22, 14, 8] cylinder{< -1.*b,-3.*b-.3333,0. >, ,r } //8 cylinder{< 2.927*b+.2696,1.309*b+.637e-1,-1.*b >,<-2.927*b+.2696,-1.309*b+.637e-1,b > ,r } //22 cylinder{< 0.,-.3333*b+.1111,-1.*b >,<0.,.3333*b+.1111,b > ,r } //16 cylinder{< -.4472*b-.569e-1,.342*b+.9217e-1,-1.*b >,<.4472*b-.569e-1,-.342*b+.9217e-1,b > ,r } //14 cylinder{< .764*b+.49e-1,-2.236*b+.1273,-1.*b >,<-.764*b+.49e-1,2.236*b+.1273,b > ,r }//4 cylinder{< -3.*b-.3333,0.,-1.*b >,<3.*b-.3333,0.,b > ,r } //26 pigment { Red} finish{ specular 0.5 diffuse 0.4 reflection 0.2} } union{ // points d'intersection #declare rr=0.008;// 6seul 0.0126 sphere{< -.1030,-.1030,.1273 >,rr } sphere{< 0.,.1273,.49e-1 >,rr } sphere{< -.262e-1,.6864e-1,.6864e-1 >,rr } sphere{< .276e-1,.1890,.276e-1 >,rr } sphere{< -.569e-1,0.,.9217e-1 >,rr } sphere{< .1667,.1667,0. >,rr } sphere{< 0.,.1111,0. >,rr } sphere{< -.569e-1,.9217e-1,0. >,rr } sphere{< .49e-1,.1273,0. >,rr } sphere{< -.3333,0.,0. >,rr } sphere{< .9217e-1,-.569e-1,0. >,rr } sphere{< .6864e-1,-.262e-1,.6864e-1 >,rr } sphere{< .276e-1,.276e-1,.1890 >,rr } sphere{< .1273,-.1030,-.1030 >,rr } sphere{< .49e-1,0.,.1273 >,rr } sphere{< .1111,0.,0. >,rr } sphere{< .1273,0.,.49e-1 >,rr } sphere{< 0.,0.,-.3333 >,rr } sphere{< .9217e-1,0.,-.569e-1 >,rr } sphere{< .1667,0.,.1667 >,rr } sphere{< 0.,-.3333,0. >,rr } sphere{< 0.,-.569e-1,.9217e-1 >,rr } sphere{< 0.,.1667,.1667 >,rr } sphere{< 0.,.49e-1,.1273 >,rr } sphere{< 0.,0.,.1111 >,rr } sphere{< .1273,.49e-1,0. >,rr } sphere{< .1890,.276e-1,.276e-1 >,rr } sphere{< 0.,.9217e-1,-.569e-1 >,rr } sphere{< -.1030,.1273,-.1030 >,rr } sphere{< .6864e-1,.6864e-1,-.262e-1 >,rr } pigment {Blue*1.5} finish{ specular 0.7 diffuse 0.2 reflection 0.5} } /* cylinder{< -1.*b,1.*b,-.3333 >, ,r } //1 cylinder{< -1.*b,1.*b+.3333,0. >, ,r }//2 cylinder{< -1.*b,1.*b+.6667,.3333 >, ,r } //3 cylinder{< .764*b+.49e-1,-2.236*b+.1273,-1.*b >,<-.764*b+.49e-1,2.236*b+.1273,b > ,r }//4 cylinder{< 0.,-3.*b-.3333,-1.*b >,<0.,3.*b-.3333,b > ,r } //5 cylinder{< .4472*b+.3903,-2.342*b+.2412,-1.*b >,<-.4472*b+.3903,2.342*b+.2412,b > ,r } // 6 cylinder{< 2.236*b+.8727,5.236*b+2.285,-1.*b >,<-2.236*b+.8727,-5.236*b+2.285,b > ,r }// 7 cylinder{< -1.*b,-3.*b-.3333,0. >, ,r } //8 cylinder{< 1.309*b+.637e-1,2.927*b+.2696,-1.*b >,<-1.309*b+.637e-1,-2.927*b+.2696,b > ,r } //9 cylinder{< .3333,1.*b+.6667,-1.*b >,<.3333,-1.*b+.6667,b > ,r } //10 cylinder{< 0.,1.*b+.3333,-1.*b >,<0.,-1.*b+.3333,b > ,r } //11 cylinder{< -.3333,1.*b,-1.*b >,<-.3333,-1.*b,b > ,r } //12 cylinder{< -.427*b-.1030,.1910*b+.4363,-1.*b >,<.427*b-.1030,-.1910*b+.4363,b > ,r } //13 cylinder{< -.4472*b-.569e-1,.342*b+.9217e-1,-1.*b >,<.4472*b-.569e-1,-.342*b+.9217e-1,b > ,r } //14 cylinder{< -.3333*b+.1111,0.,-1.*b >,<.3333*b+.1111,0.,b > ,r } //15 cylinder{< 0.,-.3333*b+.1111,-1.*b >,<0.,.3333*b+.1111,b > ,r } //16 cylinder{< .342*b+.9217e-1,-.4472*b-.569e-1,-1.*b >,<-.342*b+.9217e-1,.4472*b-.569e-1,b > ,r } //17 cylinder{< .1910*b+.4363,-.427*b-.1030,-1.*b >,<-.1910*b+.4363,.427*b-.1030,b > ,r } //18 cylinder{< 1.*b,-.3333,-1.*b >,<-1.*b,-.3333,b > ,r } //19 cylinder{< 1.*b+.3333,0.,-1.*b >,<-1.*b+.3333,0.,b > ,r } //20 cylinder{< 1.*b+.6667,.3333,-1.*b >,<-1.*b+.6667,.3333,b > ,r } //21 cylinder{< 2.927*b+.2696,1.309*b+.637e-1,-1.*b >,<-2.927*b+.2696,-1.309*b+.637e-1,b > ,r } //22 cylinder{< -1.*b,-.3333*b+.1111,0. >, ,r } //23 cylinder{< 5.236*b+2.285,2.236*b+.8727,-1.*b >,<-5.236*b+2.285,-2.236*b+.8727,b > ,r } //24 cylinder{< -2.342*b+.2412,.4472*b+.3903,-1.*b >,<2.342*b+.2412,-.4472*b+.3903,b > ,r }//25 cylinder{< -3.*b-.3333,0.,-1.*b >,<3.*b-.3333,0.,b > ,r } //26 cylinder{< -2.236*b+.1273,.764*b+.49e-1,-1.*b >,<2.236*b+.1273,-.764*b+.49e-1,b > ,r } //27 */ } // fin union des droites poly{3, < 81,-189,-189,-9,-189,54,126,-189,126,-9,81,-189,-9,-189,126,-9,81,-9,-9,1 > } // VOIR COEFFPOVRAY POUR OBTENIR CES COEFFICIENTS texture{ pigment{White*0.6 transmit 0.2} // normal{ bumps 0.5 noise_generator 3} // scale < 0.2,0.2,0.2 > *0.05 finish {ambient 0.5 diffuse 0.4 roughness 0.001 reflection 0.05 specular .8} } /**/ clipped_by { sphere{ < 0,0,0 > , 0.5 //1.5 translate < 0.1,0.,-0.6 > } } bounded_by { clipped_by } rotate <-30,-180,-27> scale 3 //0.95 translate 0.1 } text { ttf "times.ttf" "AE" 0.5,0 pigment { Cyan*1.2 } scale 0.08 rotate <0,40,0> translate <1.9,-1.3,-0.4> }