(rgb-from-hsl 
.(square 
..(vmod 
...(blue-from-hsl 
....(v+ 
.....(vfloor [3.7318577870732668 -4.086477081749095]) 
.....(vmod 
......(blue-from-hsl 
.......(max-component 
........(average 
.........(z 
..........(radius 
...........(adjust-hsl [-1.035 0.3685] pos))) 
.........(checker 
..........(sigmoid [-2.4579 1.6986 2.5909]) wood)))) 
......(height-normal 
.......(average velvet 
........(checker 
.........(sigmoid [-2.4579 1.6986 2.5909]) wood)))))) 
...(average 
....(z 
.....(hsl-from-rgb 
......(adjust-hsl 
.......(sigmoid [-2.4579 1.6986 2.5909]) pos))) 
....(checker 
.....(sigmoid [-2.4579 1.6986 2.5909]) wood)))))