Simple implementation of Perlin noise