(green-from-hsl .(checker ..(sigmoid ...(vmax [-1.113 -2.5014] grain)) ..(vfrac ...(min-component ....(v+ [-0.9336 0.3178] pos)))))