Fixed issue with original perlin implementation.
Clean up code.