diff --git a/src/experimental/pnoise1.scad b/src/experimental/pnoise1.scad
index 6a937a60..f9916363 100644
--- a/src/experimental/pnoise1.scad
+++ b/src/experimental/pnoise1.scad
@@ -2,5 +2,5 @@ use <util/rand.scad>;
 use <experimental/_impl/_pnoise1.scad>;
 
 function pnoise1(xs, seed) = 
-    let(sd = is_undef(seed) ? floor(rand(0, 256)) : seed)
+    let(sd = is_undef(seed) ? floor(rand(0, 256)) : seed % 256)
     [for(x = xs) _pnoise1(x, sd)];
\ No newline at end of file