(vround .(green-from-hsl ..(checker ...(sigmoid ....(vmax [-1.113 -2.5014] grain)) ...(vfrac ....(min-component pos)))))