Annotation of OpenXM_contrib/pari/src/test/in/ploth, Revision 1.1
1.1 ! maekawa 1: \e
! 2: default(realprecision,9)
! 3: t=plothsizes();
! 4: plotinit(0,t[1]-11,t[2]-11)
! 5: plotscale(0,0,1000,0,1000);
! 6: plotbox(0,500,500)
! 7: plotdraw([0,0,0])
! 8: psdraw([0,0,0])
! 9: plotcolor(0,2);
! 10: plotmove(0,0,900); plotlines(0,900,0)
! 11: plotlines(0,vector(5,k,50*k),vector(5,k,10*k*k))
! 12: plotmove(0,243,583); plotcursor(0)
! 13: plot(x=-5,5,sin(x))
! 14: ploth(x=-5,5,sin(x))
! 15: ploth(t=0,2*Pi,[sin(5*t),sin(7*t)])
! 16: ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],1,100)
! 17: ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],2,100)
! 18: ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],3,100)
! 19: plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500))
! 20: plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
! 21: plotpoints(0,225,334)
! 22: plotpoints(0,vector(10,k,10*k),vector(10,k,5*k*k))
! 23: psploth(x=-5,5,sin(x))
! 24: psplothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
! 25: plotmove(0,50,50);plotrbox(0,50,50)
! 26: plotrline(0,150,100)
! 27: plotcolor(0,4);
! 28: plotcursor(0)
! 29: plotrmove(0,5,5); plotcursor(0)
! 30: plotrpoint(0,20,20)
! 31: plotmove(0,100,100); plotstring(0,Pi)
! 32: plotmove(0,200,200); plotstring(0,"(0,0)")
! 33: plotdraw([0,10,10])
! 34: psdraw([0,10,10])
! 35: print("Total time spent: ",gettime);
! 36: \q
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>