From d771e6f7d207138c205dfae35da830c2bd0f1328 Mon Sep 17 00:00:00 2001
From: hjp <hjp@41646610-1e7d-41f5-9080-4b43bf584971>
Date: Mon, 2 Nov 1998 23:58:35 +0000
Subject: [PATCH] Ringwulsthangars.

---
 pr/sol/sz.pov | 42 ++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 40 insertions(+), 2 deletions(-)

diff --git a/pr/sol/sz.pov b/pr/sol/sz.pov
index 900b0a5..00b9a17 100644
--- a/pr/sol/sz.pov
+++ b/pr/sol/sz.pov
@@ -125,6 +125,41 @@
 	object {Geschuetze_Huelle_unten}
     }
 
+#declare Hangars_Ringwulst_neg = 
+    difference {
+	union {
+	    #declare i = 0
+	    #while (i < 360) 
+		union {
+		    box {
+			<-50, 40, 0>
+			< 50, 80, 2500>
+		    }
+		    box {
+			<-50, 120, 0>
+			< 50, 220, 2500>
+		    }
+		    box {
+			<-50, -40, 0>
+			< 50, -80, 2500>
+		    }
+		    box {
+			<-50, -120, 0>
+			< 50, -220, 2500>
+		    }
+		    rotate <0, i, 0>
+		}
+		#declare i = i + 30
+	    #end
+	}
+	torus {
+	    1250, 390
+	}
+	texture {
+	    Ynkelonium_Texture
+	}
+    }
+
 #declare Geschuetze_Ringwulst_aussen =
     union {
 	#declare w = -45
@@ -199,7 +234,8 @@
 	    torus {
 		1250, 400
 	    }
-	    #declare i = 0
+	    #declare i = 10
+	    #declare ii = 10
 	    #while (i < 360) 
 		object {
 		    Triebwerk_neg
@@ -213,8 +249,10 @@
 		    translate <1250, 0, 0>
 		    rotate <0, i, 0>
 		}
-		#declare i = i + 30
+		#declare i = i + ii
+		#declare ii = 30 - ii
 	    #end
+	    object {Hangars_Ringwulst_neg}
 	}
 	cone {
 	    <0, -400, 0>, 1250,