From 4f7de83ff01fe6f291ce6cb9ad2b1e919980e8e7 Mon Sep 17 00:00:00 2001
From: Justin Lin <caterpillar@openhome.cc>
Date: Sun, 25 Oct 2020 16:45:29 +0800
Subject: [PATCH] add radius param

---
 src/experimental/bauer_spiral.scad | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/experimental/bauer_spiral.scad b/src/experimental/bauer_spiral.scad
index 932c1b6f..719a1e14 100644
--- a/src/experimental/bauer_spiral.scad
+++ b/src/experimental/bauer_spiral.scad
@@ -1,4 +1,4 @@
-function bauer_spiral(n, dir = "CT_CLK") = 
+function bauer_spiral(n, radius, dir = "CT_CLK") = 
     let(
         L = sqrt(n * PI),
         toRadians = PI / 180,
@@ -16,5 +16,5 @@ function bauer_spiral(n, dir = "CT_CLK") =
             xk = sin(phikDegrees) * cos(thetakDegrees),
             yk = sin(phikDegrees) * sin(thetakDegrees)
         )
-        [xk, yk, zk]
+        [xk, yk, zk] * radius
     ];
\ No newline at end of file