(vfloor .(normalize ..(vround ...(red-from-hsl ....(vsqrt .....(radius ......(vpow .......(max-component [2.8614 1.8543 -1.5793]) .......(average [0.0262 2.5508 -2.3668 -2.7657] ........(adjust-hsl pos [2.6372 -0.9057]) 1.446))))))))