(vcos 
.(vmax 
..(vconcat 
...(v* 
....(red-from-hsl 
.....(hue-from-rgb 
......(vfloor 
.......(vabs 
........(gradient 
.........(offset 
..........(vfrac pos) 
..........(vmax pos vplasma))))))) 
....(length 
.....(polar [-1.3912 0.9099]))) 
...(lightness-from-rgb [-0.4476 0.8851])) 
..(vmin 
...(hsl-from-rgb wood) 
...(vpow 
....(vfloor 
.....(height 
......(length 
.......(adjust-hsl 
........(lightness-from-rgb -0.6956) [-2.4378 -1.1009])))) 
....(hue-from-rgb [-2.3612 1.8174 1.1921 -2.9114])))))