// Coordinates System : SetCoords(587.5,366.5,40); // Geometry : O=Point("O",-6.4125,-0.5625); A=Point("A",-1.0125,3.1625); B=Point("B","O+[cos(2*\u03C0/5)*(A[0]-O[0])-sin(2*\u03C0/5)*(A[1]-O[1]),sin(2*\u03C0/5)*(A[0]-O[0])+cos(2*\u03C0/5)*(A[1]-O[1])]","0"); iter=Expression("iter","","40","200","56","-11.6875","7.9125"); E=Point("E","O+[cos(2*\u03C0/5)*(A[0]-O[0])+sin(2*\u03C0/5)*(A[1]-O[1]),-sin(2*\u03C0/5)*(A[0]-O[0])+cos(2*\u03C0/5)*(A[1]-O[1])]","0"); k=Expression("k","","0","0.2","0.026000000000000002","-4.6875","7.9125"); S1=Segment("S1",O,B); S2=Segment("S2",E,O); D=Reflection("D",S2,A); C=Reflection("C",S1,A); Poly1=Polygon("Poly1","_A,_B,_C,_D,_E"); E1=Expression("E1","","","","var m=A;var n=B;var p=C;var q=D;var r=E;var tab=[];for (i=0; i