From 8c30830837d4e34ffdc618c3c7b45879bea25881 Mon Sep 17 00:00:00 2001
From: Tonton Th <tth@linda.buvette.org>
Date: Mon, 13 Jan 2025 15:27:56 +0100
Subject: [PATCH] add global constants

---
 elements.inc | 16 ++++++++--------
 globals.inc  | 10 ++++++++++
 2 files changed, 18 insertions(+), 8 deletions(-)

diff --git a/elements.inc b/elements.inc
index 1a81b60..8389a6f 100644
--- a/elements.inc
+++ b/elements.inc
@@ -2,18 +2,18 @@
  *   nouveau projet Thu Dec  5 11:37:05 AM UTC 2024
  */
 
-#declare   RA = 0.127;
-#declare   RB = 0.001;
+#declare   RA = R_basecone;
+// #declare   RB = 0.001;
 
 #declare HexaCone_shape = object
 {
 union	{
-	cone { 0, RA, <-1,  0,  0>, RB }
-	cone { 0, RA, < 1,  0,  0>, RB }
-	cone { 0, RA, < 0,  0,  1>, RB }
-	cone { 0, RA, < 0,  0, -1>, RB }
-	cone { 0, RA, < 0,  1,  0>, RB }
-	cone { 0, RA, < 0, -1,  0>, RB }
+	cone { 0, RA, <-1,  0,  0>, 0.0001 }
+	cone { 0, RA, < 1,  0,  0>, 0.0001 }
+	cone { 0, RA, < 0,  0,  1>, 0.0001 }
+	cone { 0, RA, < 0,  0, -1>, 0.0001 }
+	cone { 0, RA, < 0,  1,  0>, 0.0001 }
+	cone { 0, RA, < 0, -1,  0>, 0.0001 }
 	}
 }
 
diff --git a/globals.inc b/globals.inc
index 7d3bcae..681a70d 100644
--- a/globals.inc
+++ b/globals.inc
@@ -18,7 +18,17 @@ global_settings	{
 #declare  NormClock = clock / 360.0;
 
 /* ------------------------------------------------------------ */
+/*
+ *	Some constants...
+ */
 
+#declare R_basecone = 0.117;
+#declare H_cone     = 0.97;
+
+/* ------------------------------------------------------------ */
+/*
+ *	Usefull macros
+ */
 #macro Cos_01( X )
   (0.5-0.5*cos( 3.141592654 * X))
 #end