From ec9fbc6162bcf4b7785c94d09dff31dda8f35190 Mon Sep 17 00:00:00 2001
From: Justin Lin <caterpillar@openhome.cc>
Date: Thu, 5 Mar 2020 17:58:54 +0800
Subject: [PATCH] add pnoise1

---
 src/experimental/pnoise1.scad | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 src/experimental/pnoise1.scad

diff --git a/src/experimental/pnoise1.scad b/src/experimental/pnoise1.scad
new file mode 100644
index 00000000..0c9f9c32
--- /dev/null
+++ b/src/experimental/pnoise1.scad
@@ -0,0 +1,11 @@
+use <experimental/_impl/_pnoise1.scad>  ;
+
+function pnoise1(from, to, step = 0.5) = 
+    let(
+        n = to - from + 1,
+        slopes = rands(-1, 1, n)
+    )
+    [
+        for(x = [0:step:n - 1]) 
+        [from + x, _pnoise1(x, n, slopes)]
+    ];
\ No newline at end of file