Naoto
Naoto Naoto Hieda

Tweet P5 Geometry Study 1

setup=r=>createCanvas(W=400,W),t=0,draw=n=>{background(W),noFill(),r=200,s=99*sin(t+=.1),u=mouseX-r,v=mouseY-r,e=u*u+v*v,a=(e+r*r-s*s)/2,q=sqrt(e*r*r-a*a),translate(r,r),o=circle,o((a*u+v*q)/e,(a*v-u*q)/e,9),o((a*u-v*q)/e,(a*v+u*q)/e,9),o(0,0,W),o(u,v,2*s)};//#つぶやきProcessing

comments powered by Disqus