(red-from-hsl .(vpow ..(red-from-hsl ...(square ....(vsqrt .....(vdivide ......(max-component .......(average ........(blue-from-hsl [2.0414 -1.3989 1.3378 -2.7736]) ........(dot [0.6281 0.7186 -1.7745] pos))) snoise)))) ..(gradient agate)))