t=[],N=0,M=200,draw=a=>{if(!N)for(createCanvas(W=400,W);N<99;N++)t[N]=[f=5*N,0,W-f,W,sin(f)*M+M,cos(f)*M+M,0];t.find(f=>{f[1]*=.9,f[6]*=.9,t.find(([,,,,t,N])=>{b=1+mag(x=t-f[4],y=N-f[5])**2,u=f[1]+=x/b/9,v=f[6]+=y/b/9}),stroke(f),circle(f[4]+=u,f[5]+=v,5)})};//#つぶやきProcessing