Annotation of OpenXM_contrib/pari-2.2/src/test/64/ploth, Revision 1.1
1.1 ! noro 1: ? default(realprecision,9)
! 2: realprecision = 9 significant digits
! 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: % = [243, 583]
! 14: ? plot(x=-5,5,sin(x))
! 15:
! 16: 0.9995545 x""x_''''''''''''''''''''''''''''''''''_x""x'''''''''''''''''''|
! 17: | x _ "_ |
! 18: | x _ _ |
! 19: | x _ |
! 20: | _ " |
! 21: | " x |
! 22: | x _ |
! 23: | " |
! 24: | " x _ |
! 25: | _ |
! 26: | " x |
! 27: ````````````x``````````````````_````````````````````````````````
! 28: | " |
! 29: | " x _ |
! 30: | _ |
! 31: | " x |
! 32: | x _ |
! 33: | _ " |
! 34: | " x |
! 35: | " " x |
! 36: | "_ " x |
! 37: -0.999555 |...................x__x".................................."x__x
! 38: -5 5
! 39: ? ploth(x=-5,5,sin(x))
! 40: % = [-5.00000000, 5.00000000, -0.999996411, 0.999996410]
! 41: ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)])
! 42: % = [0.E-92, 6.28318530, -0.999998764, 0.999998764]
! 43: ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],1,100)
! 44: % = [-0.999874128, 0.999874127, -0.999874128, 0.999874127]
! 45: ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],2,100)
! 46: *** multi-curves cannot be plot recursively.
! 47: ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],3,100)
! 48: % = [-1.00000000, 1.00000000, -1.00000000, 1.00000000]
! 49: ? plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500))
! 50: % = [0.E-92, 500.000000, 0.E-92, 500.000000]
! 51: ? plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
! 52: % = [0.E-92, 500.000000, 0.E-92, 500.000000]
! 53: ? plotpoints(0,225,334)
! 54: ? plotpoints(0,vector(10,k,10*k),vector(10,k,5*k*k))
! 55: ? psploth(x=-5,5,sin(x))
! 56: % = [-5.00000000, 5.00000000, -0.999996411, 0.999996410]
! 57: ? psplothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
! 58: % = [0.E-92, 500.000000, 0.E-92, 500.000000]
! 59: ? plotmove(0,50,50);plotrbox(0,50,50)
! 60: ? plotrline(0,150,100)
! 61: ? plotcolor(0,4);
! 62: ? plotcursor(0)
! 63: % = [200, 150]
! 64: ? plotrmove(0,5,5);plotcursor(0)
! 65: % = [205, 155]
! 66: ? plotrpoint(0,20,20)
! 67: ? plotmove(0,100,100);plotstring(0,Pi)
! 68: ? plotmove(0,200,200);plotstring(0,"(0,0)")
! 69: ? plotdraw([0,10,10])
! 70: ? psdraw([0,10,10])
! 71: ? print("Total time spent: ",gettime);
! 72: Total time spent: 2196
! 73: ? \q
! 74: Good bye!
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>