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