||'''Book'''|| Advanced Engineering Mathematics ||
 ||'''Author'''|| Erwin Kreyszig ||
 ||'''Edition'''|| 8th Edition ||

/* code_begins */

{{{
clf()
theta=linspace(0,2*pi,1000)
x=cos(theta)
y=sin(theta)
bead=plot(x[1],y[1],'.')
hbead=plot(x[1],y[1],'.',color='r')
axis([-1,1,-1,1])
#axis('square')
for k in range(2,size(theta)):
     set(bead)
     plot(x[k],y[k],'o')
     set(hbead)
     plot(x[k],y[k],'o')
     show()
}}}

/* code_ends */

 * '''Solution by''': 
   * Beesanna,student,SNIST