ABU 28-May-2023
ABU 10-Aug-2024 - perlin-1.0.2 - Added compatibility with Tcl9
Perlin Noise is a type of gradient noise developed by Ken Perlin in 1983.
You can find pure-tcl implementations of the Perlin function at Rosetta code but of course, a binary library such as the following is many many times faster (300x).
This package Perlin, is a binary package implementing the perlin(x,x,z) function in three dimensions.
This package is distributed in a multi-platform bundle, compatible with Tcl8 and Tcl9
package require perlin # result is a floating number between -1 and +1 set v [perlin 3.14 42.0 7.0] ;# --> 0.13691995878400012
Together with the small basic library, this package provides a demo app named "Perlin Explorer" you can run for exploring the 3d perlin-space. In particular, it can help developers to fine-tune the parameters and the "step" increments to control the perlin(x,y,z) variations.