#https://www.shadertoy.com/view/lsKXWc

pixels = W:1024 H:1024

x = from 0 to 1 W
y = from 0 to 1 H

u = x*0.3
v = y*0.3
freq = 5
lacunarity = 0.8
k = 0
sum = 0
[loop start: 12
layerUp = 1 / pow(freq,lacunarity)
k = k + value_noise2(u*freq, v*freq) * layerUp
sum = sum + layerUp
freq = freq*2
loop end]
k = k/sum
x = x + k

u = x*0.3
v = y*0.3
freq = 5
lacunarity = 0.8
k = 0
sum = 0
[loop start: 12
layerUp = 1 / pow(freq,lacunarity)
k = k + value_noise2(u*freq, v*freq) * layerUp
sum = sum + layerUp
freq = freq*2
loop end]
k = k/sum
y = y + k

u = x
v = y
freq = 5
lacunarity = 0.8
k = 0
sum = 0
[loop start: 12
layerUp = 1 / pow(freq,lacunarity)
k = k + value_noise2(u*freq, v*freq) * layerUp
sum = sum + layerUp
freq = freq*2
loop end]
k = k/sum
r = pow(k,2)*2

u = x + 0.2
v = y
freq = 5
lacunarity = 0.8
k = 0
sum = 0
[loop start: 12
layerUp = 1 / pow(freq,lacunarity)
k = k + value_noise2(u*freq, v*freq) * layerUp
sum = sum + layerUp
freq = freq*2
loop end]
k = k/sum
g = pow(k,2)*2

u = x
v = y + 0.2
freq = 5
lacunarity = 0.8
k = 0
sum = 0
[loop start: 12
layerUp = 1 / pow(freq,lacunarity)
k = k + value_noise2(u*freq, v*freq) * layerUp
sum = sum + layerUp
freq = freq*2
loop end]
k = k/sum
b = pow(k,2)*2
