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