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