add nz_voronoi3s

src/experimental/demo/nz_voronoi3s_demo.scad

@@ -0,0 +1,22 @@
+use <experimental/nz_voronoi3s.scad>;
+
+size = [20, 20, 20];
+dim = 2;
+seed = 5;
+
+points = [
+    for(z = [0:size[2] - 1]) 
+        for(y = [0:size[1] - 1]) 
+            for(x = [0:size[0] - 1]) 
+                [x, y, z]
+];
+        
+noises = nz_voronoi3s(size, points, seed, dim);
+
+max_dist = max(noises);
+for(i = [0:len(noises) - 1]) {
+    c = noises[i] / max_dist * 2;
+    color([c > 1 ? 1 : c , 0, 0])
+    translate(points[i])
+        square(1);
+}

src/experimental/nz_voronoi3s.scad

@@ -0,0 +1,12 @@
+use <util/rand.scad>;
+use <experimental/_impl/_nz_voronoi3_impl.scad>;
+
+function nz_voronoi3s(size, points, seed, dim = 2) =
+    let(
+        sd = 6 + (is_undef(seed) ? floor(rand(0, 256)) : seed % 256),
+        // m*n pixels per grid
+        m = size[0] / dim,
+        n = size[1] / dim,
+        o = size[2] / dim
+    )
+    [for(p = points) _nz_voronoi3(p, sd, dim, m, n, o)];