Implementation of ridged multi-fractal noise.

Example of use:

main = putStrLn ("Noise value at (1, 2, 3): " ++ show x)
    where seed        = 1
          octaves     = 5
          scale       = 0.005
          frequency   = 1
          lacunarity  = 2
          ridgedNoise = ridged seed octaves scale frequency lacunarity
          x           = noiseValue ridgedNoise (1, 2, 3)