// Coordinates System :
SetCoords(450.79391315405485,329.5035948619152,0.6363304158669557);


// Geometry :
O=Point("O",0,0);
A=Point("A",-400,300);
C1=Circle("C1",O,A);
C=Symmetry("C",O,A);
S7=Segment("S7",A,C);
Perp1=Perpendicular("Perp1",S7,O);
D=OrderedIntersection("D",Perp1,C1,1);
B=OrderedIntersection("B",Perp1,C1,0);
S2=Segment("S2",B,C);
S3=Segment("S3",C,D);
S4=Segment("S4",D,A);
S5=Segment("S5",A,B);
S6=Segment("S6",B,D);
bleuclair="c:#0044ff";
rouge="c:#b40000";
vertfluo="c:#1df40d";

// Styles :
STL(O,"c:#0000b2;o:1;s:4;sn:true;f:20");
STL(A,"c:#0000b2;o:1;s:4;sn:true;f:20");
STL(C1,"c:#cc66cc;h:1;s:1;f:30;p:0");
STL(C,"c:#0000b2;h:1;s:6;sn:true;f:20");
STL(S7,"c:#b40000;s:1.5;f:24");
STL(Perp1,"c:#0000b2;h:1;s:1;f:30;p:0");
STL(D,"c:#0000b2;h:1;s:6;sn:true;f:20");
STL(B,"c:#0000b2;h:1;s:6;sn:true;f:20");
STL(S2,"c:#0000b2;h:1;s:1;f:24");
STL(S3,"c:#0000b2;h:1;s:1;f:24");
STL(S4,"c:#0000b2;h:1;s:1;f:24");
STL(S5,"c:#0000b2;h:1;s:1;f:24");
STL(S6,"c:#b40000;s:1;f:24");
SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");




function fils(a1,a2,b1,b2,LaCouleur,k){	
		var m1=MidPoint(a1,a2); STL(m1,"h:1");var n1=MidPoint(b1,b2); STL(n1,"h:1");
		LeSeg=Segment(m1,n1);STL(LeSeg,LaCouleur);
	if (k>0) {fils(m1,a2,b1,n1,LaCouleur,k-1);fils(a1,m1,n1,b2,LaCouleur,k-1);}	          
	     
}

n=4;
fils(O,A,O,B,rouge,n);fils(O,B,O,C,rouge,n);fils(O,C,O,D,rouge,n);fils(O,D,O,A,rouge,n);