fixed errors in Perlin Noise