[BACK]Return to ploth CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / pari / src / test / in

Annotation of OpenXM_contrib/pari/src/test/in/ploth, Revision 1.1.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>