(red-from-hsl .(vcos ..(vmax ...(min-component ....(lightness-from-rgb .....(height-normal [-0.4142 0.7324 -0.7369 2.3325]))) ...(vsqrt ....(t blotches)))))