Ricky Reusser
P([rn(0,7,.01).map(i=>(x=111*c(i)-10,y=111*s(i)+c(t/1e3)*10,$=(x*x+y*y)/1e4,[x+x/$,y-y/$]))]).a('d',ln()) 
Ricky Reusser
/*airfoil*/P([rn(0,7,.01).map(i=>(x=111*c(i)-10,y=111*s(i)+c(t/1e3)*10,$=(x*x+y*y)/1e4,[x+x/$,y-y/$]))]).a('d',ln())