diff --git a/elements.inc b/elements.inc
index 45ad4cd..0c1dd15 100644
--- a/elements.inc
+++ b/elements.inc
@@ -34,9 +34,13 @@ union	{
 		cylinder {-z, z, 0.10 }
 		}
 	// clignotement de la lumiere \o/
-	// #local Red = abs(sin(NormClock * 47.88));
-	#local Red = rand(R2);
-	light_source { 0, rgb <Red, 0.03, 0.03>
+	#local kR  = 0.111;
+	#local xR  = (rand(R2)-0.5000) * kR;
+	#local yR  = (rand(R2)-0.5000) * kR;
+	#local zR  = (rand(R2)-0.5000) * kR;
+	#local Red = abs(sin(NormClock * 77.88));
+	#local Red = Red * rand(R2);
+	light_source { <xR, yR, xR>, rgb <Red, 0.03, 0.03>
 		fade_distance	0.99
 		fade_power	1.58
 		}
@@ -125,23 +129,28 @@ texture { Orange_Glass }
 /*	------------------------------------------
  *	new Sat Dec 21 11:17:36 PM UTC 2024
  */
-#declare DXail = 0.001;
-#declare DYail = 0.0025;
-#declare DZail = 0.028;
+#declare DXail = 0.0007;
+#declare DYail = 0.0039;
+#declare DZail = 0.031;
 
 #declare Une_Ailettte = object
 {
-box { <-DXail, -DYail, -DZail> , <DXail, DYail, DZail/5> }
+box { <-DXail, -DYail, -DZail> , <DXail, DYail, 0> }
 }
 
 #declare Le_rotor = object
 {
+#local Rrot = 0.0034;
+#local Lrot = 0.13;
 union {
-	cylinder { <-0.1, 0, 0>, <0.1, 0, 0>, 0.003 }
-	#for (foo, 0, 18)
+	sphere   { -x*Lrot, Rrot  }
+	cylinder { <-Lrot, 0, 0>, <Lrot, 0, 0>, Rrot }
+	sphere   {  x*Lrot, Rrot }
+	#for (foo, -9, 9)
 		object  { Une_Ailettte
-			rotate (foo*27)*x
-			translate ((foo*0.012)-0.05)*x }
+			translate -0.004*z
+			rotate (foo*35)*x
+			translate (foo*0.013)*x }
 	#end
 	}
 // texture { T_Chrome_1C }
@@ -178,6 +187,8 @@ merge	{
 #end
 
 	cylinder { y*Rtuy, y*(Rtuy+0.08), 0.010 scale <2.95, 1, 1> }
+	sphere { 0, 0.017 scale <4.5, 1, 0.717>
+				translate z*(Rtuy+Etuy/3) }
 	}
 texture { T_Brass_1C }
 }
@@ -186,7 +197,7 @@ texture { T_Brass_1C }
 {
 union	{
 	object { Tuyere }
-	object { Le_rotor rotate x*clock translate -0.05*x }
+	object { Le_rotor rotate x*(clock*2) translate -0.08*x }
 	}
 }
 
@@ -194,8 +205,8 @@ union	{
 {
 union	{
 	#local E = 0.59;
-	object { Reacteur     translate -E*z }
-	object { Reacteur     translate  E*z }
+	object { Reacteur  scale <1, 1, -1>   translate -E*z }
+	object { Reacteur                     translate  E*z }
 	}
 rotate -y*90
 }
@@ -213,5 +224,5 @@ union	{
 	object { HexaCone_derives translate <0, 0, -0.67>	}
 	object { Les_Reacteurs      translate -0.18*y 		}
 	}
-rotate <-7, 0, -4>
+rotate <-3, 0, -4>
 }