function Tetraedre1(x,y,z) {
	this.A=Point3D(x,y,z);
	SetPointType(this.A,"circle");
	SetColor(this.A,"red");
	SetThickness(this.A,"thick");
	this.t=ExecuteMacro("tetraedre1","O,X,Y,Z,"+this.A);
	SetColor(this.t[10],"blue");
	SetColor(this.t[11],"cyan");
	SetColor(this.t[12],"cyan");
	SetColor(this.t[13],"cyan");
}

function Octaedre1(x,y,z) {
	this.A=Point3D(x,y,z);
	Hide(this.A);
	this.t=ExecuteMacro("octaedre1","O,X,Y,Z,"+this.A);
}

function Octaedre2(x,y,z,e1,e2,e3,ec) {
	this.A=Point3D(x+"+"+e1+"*"+ec,y+"+"+e2+"*"+ec,z+"+"+e3+"*"+ec);
	Hide(this.A);
	this.t=ExecuteMacro("octaedre2","O,X,Y,Z,"+this.A);
}

function Tetraedre2(x,y,z,e1,e2,e3,ec) {
	this.A=Point3D(x+"+"+e1+"*"+ec,y+"+"+e2+"*"+ec,z+"+"+e3+"*"+ec);
	this.t=ExecuteMacro("tetraedre2","O,X,Y,Z,"+this.A+","+e1+","+e2+","+e3);
	SetColor(this.t[9],"blue");
	SetColor(this.t[10],"cyan");
	SetColor(this.t[11],"cyan");
	SetColor(this.t[12],"cyan");
}

xA=3; yA=0; zA=2;
tetra1=new Tetraedre1(xA,yA,zA);
octa1=new Octaedre1(xA,yA,zA);
tetra2=new Tetraedre1(xA+2*Math.sqrt(2)/3,yA,zA-4/3);
tetra3=new Tetraedre1(xA-Math.sqrt(2)/3,yA-Math.sqrt(6)/3,zA-4/3);
tetra4=new Tetraedre1(xA-Math.sqrt(2)/3,yA+Math.sqrt(6)/3,zA-4/3);

xA2=-2; yA2=1; zA2=2;
octaedre1=new Octaedre2(xA2,yA2,zA2,"zero","zero","un","ecart2");
octaedre2=new Octaedre2(xA2+1,yA2,zA2-1,"un","zero","zero","ecart2");
octaedre3=new Octaedre2(xA2,yA2+1,zA2-1,"zero","un","zero","ecart2");
octaedre4=new Octaedre2(xA2-1,yA2,zA2-1,"moinsUn","zero","zero","ecart2");
octaedre5=new Octaedre2(xA2,yA2-1,zA2-1,"zero","moinsUn","zero","ecart2");
octaedre6=new Octaedre2(xA2,yA2,zA2-2,"zero","zero","moinsUn","ecart2");

tetraedre1= new Tetraedre2(xA2,yA2,zA2-1,"un","un","un","ecart");
tetraedre2= new Tetraedre2(xA2,yA2,zA2-1,"moinsUn","un","un","ecart");
tetraedre3= new Tetraedre2(xA2,yA2,zA2-1,"un","moinsUn","un","ecart");
tetraedre4= new Tetraedre2(xA2,yA2,zA2-1,"moinsUn","moinsUn","un","ecart");
tetraedre5= new Tetraedre2(xA2,yA2,zA2-1,"un","un","moinsUn","ecart");
tetraedre6= new Tetraedre2(xA2,yA2,zA2-1,"moinsUn","un","moinsUn","ecart");
tetraedre7= new Tetraedre2(xA2,yA2,zA2-1,"un","moinsUn","moinsUn","ecart");
tetraedre8= new Tetraedre2(xA2,yA2,zA2-1,"moinsUn","moinsUn","moinsUn","ecart");