(green-from-hsl .(checker ..(sigmoid ...(vmax [-1.113 -2.5014] grain)) ..(v- ...(vcos ....(vsqrt .....(square ......(height .......(square ........(normalize .........(dot pos vplasma))))))) pos)))