Makefile

@@ -18,7 +18,7 @@ PNG:	essai.png scene.png topview.png passage.png	\
 	orbite.png hexabenz.png escadrille.png		\
 	hexacone.png remote.png survol.png cutoff.png	\
 	carto.png hexawood.png bubblecut.png		\
-	circular.png panoramic.png splined.png
+	circular.png panoramic.png
 	echo "make PNG ck=$(CK) done" >> WS/log
 
 

essai.pov

@@ -24,6 +24,38 @@
  *	rail circulaire 
  */
 
+#macro Wagonnet_0 (Longueur)
+object {
+	/* le corps */
+	merge	{
+	#local L2 = Longueur / 2;
+	#local R = 0.50;
+	cylinder { <L2, 0, 0>,	<-L2, 0, 0>, R			}
+	sphere   { <0, 0, 0>, R
+			scale <3, 1, 1>
+			translate x*L2
+		}
+
+	/* le kiosque (est-ce un sous-marin ?) */
+	sphere   { 		<-L2, 0, 0>, R 			}
+	merge	{
+		cylinder { <0, 0, 0>,	<0, L2, 0>, R/4		}
+		sphere   { <0, 0, 0>, R/4
+			   scale <1, 0.4, 1> translate y*L2
+			 }
+		scale <2, 1, 1> translate x*L2*0.70 
+		}
+	#local R = rand(Rng1);
+	#if (R < 0.333)
+	  texture { WIP_color					}
+	#elseif (R < 0.666)
+	  texture { GoldDark					}
+	#else
+	  texture { Flashy scale 17				}
+	#end 
+	}
+}
+#end		// macro
 
 #declare Un_Wagonnet = object
 {

xperiment.inc

@@ -4,38 +4,6 @@
  *	A cosy place for experimental things (2025/10/27)
  *
  */
-#macro Wagonnet_0 (Longueur)
-object {
-	/* le corps */
-	merge	{
-	#local L2 = Longueur / 2;
-	#local R = 0.55;
-	cylinder { <L2, 0, 0>,	<-L2, 0, 0>, R			}
-	sphere   { <0, 0, 0>, R
-			scale <3, 1, 1>
-			translate x*L2
-		}
-
-	/* le kiosque (est-ce un sous-marin ?) */
-	sphere   { 		<-L2, 0, 0>, R 			}
-	merge	{
-		cylinder { <0, 0, 0>,	<0, L2, 0>, R/4		}
-		sphere   { <0, 0, 0>, R/4
-			   scale <1, 0.4, 1> translate y*L2
-			 }
-		scale <2, 1, 1> translate x*L2*0.70 
-		}
-	#local R = rand(Rng1);
-	#if (R < 0.333)
-	  texture { WIP_color					}
-	#elseif (R < 0.666)
-	  texture { GoldDark					}
-	#else
-	  texture { Flashy scale 17				}
-	#end 
-	}
-}
-#end		// macro
 
 // =======================================================
 /*