(average 
.(min-component 
..(vsin 
...(vmax 
....(length 
.....(vabs 
......(t 
.......(hsl-from-rgb [0.064 2.113])))) 
....(vdivide [-0.6379 -2.6638 2.3766 -1.855] 
.....(red-from-hsl 
......(max-component 
.......(average 
........(alpha pos) pos))))))) 
.(hsl-from-rgb 
..(vpow 
...(vfloor 
....(v+ 
.....(vabs 
......(vmax [-2.1707 -0.534] 
.......(offset 
........(x [-1.213 -2.2102]) 1.2123))) [-1.8992 0.7946])) 
...(lightness-from-rgb 
....(gradient 
.....(vdivide [-2.1945 -0.5987 1.7458] -0.5203))))))