> plot([(1-7/8*exp(-(theta-7*Pi/4)^2))*(1-7/8*exp(-(theta-5*Pi/4)^2))*(1+cos(theta+Pi/2)),theta,theta=Pi/2..5*Pi/2],coords=polar);

> plot({[0.8*cos(t),sin(t),t=0..2*Pi],[-1/3+1/8*cos(t),1/3+1/16*sin(t),t=0..2*Pi],[1/3+1/8*cos(t),1/3+1/16*sin(t),t=0..2*Pi],[1/8*sin(t),-1/5+1/8*sin(t)^2,t=0..2*Pi],[1/5*cos(t),-0.5+1/20*sin(t),t=0..2*Pi]}, scaling=CONSTRAINED, title=`Who?`);

>

>

> plot({[0.8*cos(t),sin(t),t=0..2*Pi],[-1/3+1/6*sin(t),1/3-1/32*sin(t)^2,t=0..2*Pi],[1/3+1/6*sin(t),1/3-1/32*sin(t)^2,t=0..2*Pi],[1/8*sin(t),-1/5+1/28*sin(t)^2,t=0..2*Pi],[1/3.8*sin(t),-0.5+1/16*sin(t)^2,t=0..2*Pi],[1/3.8*sin(t),-0.56+1/8*sin(t)^2,t=0..2*Pi]}, scaling=CONSTRAINED, title=`Happy New Year`);

>