function paveDroitMobile(xA,yA,zA,dx,dy,dz,message) {
	var A=Point3D(xA,yA,zA);
	Hide(A);
	var B=Point3D(xA+"+"+dx,yA,zA);
	Hide(B);
	var C=Point3D(xA,yA+"+"+dy,zA);
	Hide(C);
	var D=Point3D(xA,yA,zA+"+"+dz);
	Hide(D);
	ExecuteMacro("pave","O,X,Y,Z,"+A+","+B+","+C+","+D);
	var ancre=Point3D(xA+"+"+dx+"/2",yA+"+"+dy+"/2",zA+"+"+dz+"/2");
	Hide(ancre);
	var text=Text(message,"x("+ancre+")-15/pixel","y("+ancre+")+30/pixel");
}
//PaveDroitMobile(0,0,0,"c+d","c+d","c+d");
paveDroitMobile("-t","-t",0,"c","c","c","$a^3$");
paveDroitMobile("c+t","c+t","c+t","d","d","d","$b^3$");
paveDroitMobile("c+t","-t",0,"d","c","c","$ba^2$");
paveDroitMobile("-t","c+t",0,"c","d","c","$ba^2$");
paveDroitMobile("c+t","c+t",0,"d","d","c","$ab^2$");
paveDroitMobile("-t","-t","c+t","c","c","d","$ba^2$");
paveDroitMobile("c+t","-t","c+t","d","c","d","$ab^2$");
paveDroitMobile("-t","c+t","c+t","c","d","d","$ab^2$");