Annotation of OpenXM_contrib/pari-2.2/src/test/32/compat, Revision 1.2
1.1 noro 1: echo = 1 (on)
2: ? default(compatible,3)
3: compatible = 3 (use old functions, ignore case)
4: *** Warning: user functions re-initialized.
5: ? +3
6: 3
7: ? -5
8: -5
9: ? 5+3
10: 8
11: ? 5-3
12: 2
13: ? 5/3
14: 5/3
15: ? 5\3
16: 1
17: ? 5\/3
18: 2
19: ? 5%3
20: 2
21: ? 5^3
22: 125
23: ? \precision=57
24: realprecision = 57 significant digits
25: ? pi
26: 3.14159265358979323846264338327950288419716939937510582097
27: ? \precision=38
28: realprecision = 38 significant digits
29: ? o(x^12)
30: O(x^12)
31: ? padicno=(5/3)*127+o(127^5)
32: 44*127 + 42*127^2 + 42*127^3 + 42*127^4 + O(127^5)
33: ? initrect(0,500,500)
34: ? abs(-0.01)
35: 0.0099999999999999999999999999999999999999
36: ? acos(0.5)
37: 1.0471975511965977461542144610931676280
38: ? acosh(3)
39: 1.7627471740390860504652186499595846180
40: ? acurve=initell([0,0,1,-1,0])
41: [0, 0, 1, -1, 0, 0, -2, 1, -1, 48, -216, 37, 110592/37, [0.83756543528332303
42: 544481089907503024040, 0.26959443640544455826293795134926000404, -1.10715987
43: 16887675937077488504242902444]~, 2.9934586462319596298320099794525081778, 2.
44: 4513893819867900608542248318665252253*I, -0.47131927795681147588259389708033
45: 769964, -1.4354565186686843187232088566788165076*I, 7.3381327407895767390707
46: 210033323055881]
47: ? apoint=[2,2]
48: [2, 2]
49: ? isoncurve(acurve,apoint)
50: 1
51: ? addell(acurve,apoint,apoint)
52: [21/25, -56/125]
53: ? addprimes([nextprime(10^9),nextprime(10^10)])
54: [1000000007, 10000000019]
55: ? adj([1,2;3,4])
56:
57: [4 -2]
58:
59: [-3 1]
60:
61: ? agm(1,2)
62: 1.4567910310469068691864323832650819749
63: ? agm(1+o(7^5),8+o(7^5))
64: 1 + 4*7 + 6*7^2 + 5*7^3 + 2*7^4 + O(7^5)
65: ? algdep(2*cos(2*pi/13),6)
66: x^6 + x^5 - 5*x^4 - 4*x^3 + 6*x^2 + 3*x - 1
67: ? algdep2(2*cos(2*pi/13),6,15)
68: x^6 + x^5 - 5*x^4 - 4*x^3 + 6*x^2 + 3*x - 1
69: ? akell(acurve,1000000007)
70: 43800
71: ? nfpol=x^5-5*x^3+5*x+25
72: x^5 - 5*x^3 + 5*x + 25
73: ? nf=initalg(nfpol)
1.2 ! noro 74: [x^5 - 5*x^3 + 5*x + 25, [1, 2], 595125, 45, [[1, -1.08911514572050482502495
! 75: 27946671612683, -2.4285174907194186068992069565359418364, 0.7194669112891317
! 76: 8943997506477288225728, -2.5558200350691694950646071159426779970; 1, -0.1383
! 77: 8372073406036365047976417441696635 - 0.4918163765776864349975328551474152510
! 78: 7*I, 1.9647119211288133163138753392090569931 + 0.809714924188978951282940822
! 79: 19556466856*I, -0.072312766896812300380582649294307897098 + 2.19808037538462
! 80: 76641195195160383234877*I, -0.98796319352507039803950539735452837196 + 1.570
! 81: 1452385894131769052374806001981108*I; 1, 1.682941293594312776162956161507997
! 82: 6005 + 2.0500351226010726172974286983598602163*I, -0.75045317576910401286427
! 83: 186094108607489 + 1.3101462685358123283560773619310445915*I, -0.787420688747
! 84: 75359433940488309213323154 + 2.1336633893126618034168454610457936017*I, 1.26
! 85: 58732110596551455718089553258673705 - 2.716479010374315056657802803578983483
! 86: 4*I], [1, -1.0891151457205048250249527946671612683, -2.428517490719418606899
! 87: 2069565359418364, 0.71946691128913178943997506477288225728, -2.5558200350691
! 88: 694950646071159426779970; 1.4142135623730950488016887242096980785, -0.195704
! 89: 13467375904264179382543977540672, 2.7785222450164664309920925654093065576, -
! 90: 0.10226569567819614506098907018896260032, -1.3971909474085893198147151262541
! 91: 540506; 0, -0.69553338995335755797766403996841143190, 1.14510982744395651299
! 92: 26149974389115722, 3.1085550780550843138423672171643499921, 2.22052069130868
! 93: 72788181483285734827868; 1.4142135623730950488016887242096980785, 2.38003840
! 94: 20787979181834702019470475018, -1.0613010590986270398182318786558994412, -1.
! 95: 1135810173202366904448352912286604470, 1.79021506332534372536778891648110361
! 96: 60; 0, 2.8991874737236275652408825679737171586, 1.85282662165584876344468105
! 97: 12816401036, 3.0174557027049114270734649132936867272, -3.8416814583731999185
! 98: 306312841432940660], 0, [5, 2, 0, -1, -2; 2, -2, -5, -10, 20; 0, -5, 10, -10
! 99: , 5; -1, -10, -10, -17, 1; -2, 20, 5, 1, -8], [345, 0, 200, 110, 177; 0, 345
! 100: , 95, 1, 145; 0, 0, 5, 4, 3; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1], [108675, 5175, 0
! 101: , -10350, -15525; 5175, 13800, -8625, -1725, 27600; 0, -8625, 37950, -17250,
! 102: 0; -10350, -1725, -17250, -24150, -15525; -15525, 27600, 0, -15525, -3450],
! 103: [595125, [238050, -296700, 91425, 1725, 0]~]], [-2.428517490719418606899206
! 104: 9565359418364, 1.9647119211288133163138753392090569931 + 0.80971492418897895
! 105: 128294082219556466856*I, -0.75045317576910401286427186094108607489 + 1.31014
! 106: 62685358123283560773619310445915*I], [1, 1/15*x^4 - 2/3*x^2 + 1/3*x + 4/3, x
! 107: , 2/15*x^4 - 1/3*x^2 + 2/3*x - 1/3, -1/15*x^4 + 1/3*x^3 + 1/3*x^2 - 4/3*x -
! 108: 2/3], [1, 0, 3, 1, 10; 0, 0, -2, 1, -5; 0, 1, 0, 3, -5; 0, 0, 1, 1, 10; 0, 0
! 109: , 0, 3, 0], [1, 0, 0, 0, 0, 0, -1, -1, -2, 4, 0, -1, 3, -1, 1, 0, -2, -1, -3
! 110: , -1, 0, 4, 1, -1, -1; 0, 1, 0, 0, 0, 1, 1, -1, -1, 1, 0, -1, -2, -1, 1, 0,
! 111: -1, -1, -1, 3, 0, 1, 1, 3, -3; 0, 0, 1, 0, 0, 0, 0, 0, 1, -1, 1, 0, 0, 0, -2
! 112: , 0, 1, 0, -1, -1, 0, -1, -2, -1, -1; 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1,
! 113: 1, 2, 1, 0, 1, 0, 0, 0, 0, 2, 0, -1; 0, 0, 0, 0, 1, 0, -1, -1, -1, 1, 0, -1
! 114: , 0, 1, 0, 0, -1, 1, 0, 0, 1, 1, 0, 0, -1]]
1.1 noro 115: ? ba=algtobasis(nf,mod(x^3+5,nfpol))
1.2 ! noro 116: [6, 1, 3, 1, 3]~
1.1 noro 117: ? anell(acurve,100)
118: [1, -2, -3, 2, -2, 6, -1, 0, 6, 4, -5, -6, -2, 2, 6, -4, 0, -12, 0, -4, 3, 1
119: 0, 2, 0, -1, 4, -9, -2, 6, -12, -4, 8, 15, 0, 2, 12, -1, 0, 6, 0, -9, -6, 2,
120: -10, -12, -4, -9, 12, -6, 2, 0, -4, 1, 18, 10, 0, 0, -12, 8, 12, -8, 8, -6,
121: -8, 4, -30, 8, 0, -6, -4, 9, 0, -1, 2, 3, 0, 5, -12, 4, 8, 9, 18, -15, 6, 0
122: , -4, -18, 0, 4, 24, 2, 4, 12, 18, 0, -24, 4, 12, -30, -2]
123: ? apell(acurve,10007)
124: 66
125: ? apell2(acurve,10007)
126: 66
127: ? apol=x^3+5*x+1
128: x^3 + 5*x + 1
129: ? apprpadic(apol,1+o(7^8))
130: [1 + 6*7 + 4*7^2 + 4*7^3 + 3*7^4 + 4*7^5 + 6*7^7 + O(7^8)]
131: ? apprpadic(x^3+5*x+1,mod(x*(1+o(7^8)),x^2+x-1))
132: [mod((1 + 3*7 + 3*7^2 + 4*7^3 + 4*7^4 + 4*7^5 + 2*7^6 + 3*7^7 + O(7^8))*x +
133: (2*7 + 6*7^2 + 6*7^3 + 3*7^4 + 3*7^5 + 4*7^6 + 5*7^7 + O(7^8)), x^2 + x - 1)
134: ]~
135: ? 4*arg(3+3*i)
136: 3.1415926535897932384626433832795028842
137: ? 3*asin(sqrt(3)/2)
138: 3.1415926535897932384626433832795028841
139: ? asinh(0.5)
140: 0.48121182505960344749775891342436842313
141: ? assmat(x^5-12*x^3+0.0005)
142:
143: [0 0 0 0 -0.00049999999999999999999999999999999999999]
144:
145: [1 0 0 0 0]
146:
147: [0 1 0 0 0]
148:
149: [0 0 1 0 12]
150:
151: [0 0 0 1 0]
152:
153: ? 3*atan(sqrt(3))
154: 3.1415926535897932384626433832795028841
155: ? atanh(0.5)
156: 0.54930614433405484569762261846126285232
157: ? basis(x^3+4*x+5)
158: [1, x, 1/7*x^2 - 1/7*x - 2/7]
159: ? basis2(x^3+4*x+5)
160: [1, x, 1/7*x^2 - 1/7*x - 2/7]
161: ? basistoalg(nf,ba)
162: mod(x^3 + 5, x^5 - 5*x^3 + 5*x + 25)
163: ? bernreal(12)
164: -0.25311355311355311355311355311355311354
165: ? bernvec(6)
166: [1, 1/6, -1/30, 1/42, -1/30, 5/66, -691/2730]
167: ? bestappr(pi,10000)
168: 355/113
169: ? bezout(123456789,987654321)
170: [-8, 1, 9]
171: ? bigomega(12345678987654321)
172: 8
173: ? mcurve=initell([0,0,0,-17,0])
174: [0, 0, 0, -17, 0, 0, -34, 0, -289, 816, 0, 314432, 1728, [4.1231056256176605
175: 498214098559740770251, 0.E-38, -4.1231056256176605498214098559740770251]~, 1
176: .2913084409290072207105564235857096009, 1.2913084409290072207105564235857096
177: 009*I, -1.2164377440798088266474269946818791934, -3.649313232239426479942280
178: 9840456375802*I, 1.6674774896145033307120230298772362381]
179: ? mpoints=[[-1,4],[-4,2]]~
180: [[-1, 4], [-4, 2]]~
181: ? mhbi=bilhell(mcurve,mpoints,[9,24])
182: [-0.72448571035980184146215805860545027439, 1.307328627832055544492943428892
183: 1943055]~
184: ? bin(1.1,5)
185: -0.0045457499999999999999999999999999999997
186: ? binary(65537)
187: [1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]
188: ? bittest(10^100,100)
189: 1
190: ? boundcf(pi,5)
191: [3, 7, 15, 1, 292]
192: ? boundfact(40!+1,100000)
193:
194: [41 1]
195:
196: [59 1]
197:
198: [277 1]
199:
200: [1217669507565553887239873369513188900554127 1]
201:
202: ? move(0,0,0);box(0,500,500)
203: ? setrand(1);buchimag(1-10^7,1,1)
204: *** Warning: not a fundamental discriminant in quadclassunit.
1.2 ! noro 205: [2416, [1208, 2], [qfi(277, 55, 9028), qfi(1700, 1249, 1700)], 1, 1.00257481
! 206: 6299307750]
1.1 noro 207: ? setrand(1);bnf=buchinitfu(x^2-x-57,0.2,0.2)
208: [mat(3), mat([1, 2, 1, 2, 1, 2, 1, 2, 1]), [-2.71246530518434397468087951060
1.2 ! noro 209: 61300698 + 3.1415926535897932384626433832795028842*I; 2.71246530518434397468
! 210: 08795106061300699], [1.7903417566977293763292119206302198761, 1.289761953065
! 211: 2735025030086072395031017 + 3.1415926535897932384626433832795028842*I, 0.701
! 212: 48550268542821846861610071436900868, -1.36845553 E-48, 0.5005798036324558738
! 213: 2620331339071677436 + 3.1415926535897932384626433832795028842*I, 1.088856254
! 214: 0123011578605958199158508674, 1.7241634548149836441438434283070556826 + 3.14
! 215: 15926535897932384626433832795028842*I, -0.3432876442770270943898878667334192
! 216: 1876 + 3.1415926535897932384626433832795028842*I, 2.133629400974756470719099
! 217: 7873636390948 + 3.1415926535897932384626433832795028842*I, 0.066178301882745
! 218: 732185368492323164193433 + 3.1415926535897932384626433832795028842*I; -1.790
! 219: 3417566977293763292119206302198760, -1.2897619530652735025030086072395031017
! 220: , -0.70148550268542821846861610071436900868, 1.36845553 E-48, -0.50057980363
! 221: 245587382620331339071677436, -1.0888562540123011578605958199158508674, -1.72
! 222: 41634548149836441438434283070556826, 0.3432876442770270943898878667334192187
! 223: 6, -2.1336294009747564707190997873636390948, -0.0661783018827457321853684923
! 224: 23164193433], [[3, [0, 1]~, 1, 1, [1, 1]~], [5, [-1, 1]~, 1, 1, [2, 1]~], [1
! 225: 1, [-1, 1]~, 1, 1, [2, 1]~], [3, [1, 1]~, 1, 1, [0, 1]~], [5, [2, 1]~, 1, 1,
! 226: [-1, 1]~], [11, [2, 1]~, 1, 1, [-1, 1]~], [19, [1, 1]~, 1, 1, [0, 1]~], [17
! 227: , [3, 1]~, 1, 1, [-2, 1]~], [17, [-2, 1]~, 1, 1, [3, 1]~], [19, [0, 1]~, 1,
! 228: 1, [1, 1]~]], 0, [x^2 - x - 57, [2, 0], 229, 1, [[1, -8.06637297521077796359
! 229: 59310246705326058; 1, 7.0663729752107779635959310246705326058], [1, -8.06637
! 230: 29752107779635959310246705326058; 1, 7.0663729752107779635959310246705326058
! 231: ], 0, [2, -1; -1, 115], [229, 115; 0, 1], [115, 1; 1, 2], [229, [115, 1]~]],
! 232: [-7.0663729752107779635959310246705326058, 8.066372975210777963595931024670
! 233: 5326058], [1, x - 1], [1, 1; 0, 1], [1, 0, 0, 57; 0, 1, 1, -1]], [[3, [3], [
! 234: [3, 0; 0, 1]]], 2.7124653051843439746808795106061300699, 0.88144225126545793
! 235: 64, [2, -1], [x + 7], 155], [mat(1), [[0, 0]], [[1.7903417566977293763292119
! 236: 206302198761, -1.7903417566977293763292119206302198760]]], 0]
1.1 noro 237: ? buchcertify(bnf)
238: 1
239: ? buchfu(bnf)
1.2 ! noro 240: [[x + 7], 155]
1.1 noro 241: ? setrand(1);buchinitforcefu(x^2-x-100000)
1.2 ! noro 242: [mat(5), mat([3, 2, 1, 2, 0, 3, 0, 2, 2, 3, 1, 4, 3, 2, 2, 3, 3, 0]), [-129.
! 243: 82045011403975460991182396195022419 + 6.283185307179586476925286766559005768
! 244: 4*I; 129.82045011403975460991182396195022419], [-41.811264589129943393339502
! 245: 258694361489 + 6.2831853071795864769252867665590057684*I, 9.2399004147902289
! 246: 816376260438840931575 + 3.1415926535897932384626433832795028842*I, -11.87460
! 247: 9881075406725097315997431161032 + 3.1415926535897932384626433832795028842*I,
! 248: 0.E-67, -51.051165003920172374977128302578454646 + 3.1415926535897932384626
! 249: 433832795028842*I, -64.910225057019877304955911980975112095 + 3.141592653589
! 250: 7932384626433832795028842*I, -29.936654708054536668242186261263200456 + 3.14
! 251: 15926535897932384626433832795028842*I, -47.668319071568233997332918482707687
! 252: 878 + 6.2831853071795864769252867665590057684*I, 3.8762936464778825067484824
! 253: 790355076166, -6.7377511782956880607802359510546381087 + 3.14159265358979323
! 254: 84626433832795028842*I, -35.073513410834255332559266307639723380 + 3.1415926
! 255: 535897932384626433832795028842*I, 33.130781426597481571750300827582717074 +
! 256: 2.96736492 E-67*I, 54.878404098312329644822020875673145627 + 5.93472984 E-67
! 257: *I, -14.980188104648613073630759189293219180 + 3.141592653589793238462643383
! 258: 2795028842*I, -26.831076484481330319708743069401142308 + 3.14159265358979323
! 259: 84626433832795028842*I, -19.706749066516065512488907834878146944 + 3.1415926
! 260: 535897932384626433832795028842*I, -22.104515522613877880850594423816214544 +
! 261: 3.1415926535897932384626433832795028842*I, -45.6875582356078259000879847377
! 262: 29869105 + 6.2831853071795864769252867665590057684*I, 47.6683190715682339973
! 263: 32918482707687879 + 1.18694596 E-66*I; 41.8112645891299433933395022586943614
! 264: 89, -9.2399004147902289816376260438840931575, 11.874609881075406725097315997
! 265: 431161032, 0.E-67, 51.051165003920172374977128302578454646, 64.9102250570198
! 266: 77304955911980975112095, 29.936654708054536668242186261263200456, 47.6683190
! 267: 71568233997332918482707687879, -3.8762936464778825067484824790355076166, 6.7
! 268: 377511782956880607802359510546381087, 35.07351341083425533255926630763972338
! 269: 0, -33.130781426597481571750300827582717074, -54.878404098312329644822020875
! 270: 673145627, 14.980188104648613073630759189293219180, 26.831076484481330319708
! 271: 743069401142309, 19.706749066516065512488907834878146944, 22.104515522613877
! 272: 880850594423816214544, 45.687558235607825900087984737729869105, -47.66831907
! 273: 1568233997332918482707687878], [[2, [2, 1]~, 1, 1, [1, 1]~], [5, [5, 1]~, 1,
! 274: 1, [1, 1]~], [13, [-5, 1]~, 1, 1, [6, 1]~], [2, [3, 1]~, 1, 1, [0, 1]~], [5
! 275: , [6, 1]~, 1, 1, [0, 1]~], [7, [4, 1]~, 2, 1, [-3, 1]~], [13, [6, 1]~, 1, 1,
! 276: [-5, 1]~], [23, [7, 1]~, 1, 1, [-6, 1]~], [43, [-15, 1]~, 1, 1, [16, 1]~],
! 277: [17, [20, 1]~, 1, 1, [-2, 1]~], [17, [15, 1]~, 1, 1, [3, 1]~], [29, [14, 1]~
! 278: , 1, 1, [-13, 1]~], [29, [-13, 1]~, 1, 1, [14, 1]~], [31, [39, 1]~, 1, 1, [-
! 279: 7, 1]~], [31, [24, 1]~, 1, 1, [8, 1]~], [41, [7, 1]~, 1, 1, [-6, 1]~], [41,
! 280: [-6, 1]~, 1, 1, [7, 1]~], [43, [16, 1]~, 1, 1, [-15, 1]~], [23, [-6, 1]~, 1,
! 281: 1, [7, 1]~]], 0, [x^2 - x - 100000, [2, 0], 400001, 1, [[1, -316.7281613012
! 282: 9840161392089489603747004; 1, 315.72816130129840161392089489603747004], [1,
! 283: -316.72816130129840161392089489603747004; 1, 315.728161301298401613920894896
! 284: 03747004], 0, [2, -1; -1, 200001], [400001, 200001; 0, 1], [200001, 1; 1, 2]
! 285: , [400001, [200001, 1]~]], [-315.72816130129840161392089489603747004, 316.72
! 286: 816130129840161392089489603747004], [1, x - 1], [1, 1; 0, 1], [1, 0, 0, 1000
! 287: 00; 0, 1, 1, -1]], [[5, [5], [[2, 0; 0, 1]]], 129.82045011403975460991182396
! 288: 195022419, 0.9876536979069047228, [2, -1], [37955488401901378100630325489636
! 289: 9154068336082609238336*x + 1198361656442507899904628359500228716651781276113
! 290: 16131167], 24], [mat(1), [[0, 0]], [[-41.81126458912994339333950225869436148
! 291: 9 + 6.2831853071795864769252867665590057684*I, 41.81126458912994339333950225
! 292: 8694361489]]], 0]
1.1 noro 293: ? setrand(1);bnf=buchinitfu(x^2-x-57,0.2,0.2)
294: [mat(3), mat([1, 2, 1, 2, 1, 2, 1, 2, 1]), [-2.71246530518434397468087951060
1.2 ! noro 295: 61300698 + 3.1415926535897932384626433832795028842*I; 2.71246530518434397468
! 296: 08795106061300699], [1.7903417566977293763292119206302198761, 1.289761953065
! 297: 2735025030086072395031017 + 3.1415926535897932384626433832795028842*I, 0.701
! 298: 48550268542821846861610071436900868, -1.36845553 E-48, 0.5005798036324558738
! 299: 2620331339071677436 + 3.1415926535897932384626433832795028842*I, 1.088856254
! 300: 0123011578605958199158508674, 1.7241634548149836441438434283070556826 + 3.14
! 301: 15926535897932384626433832795028842*I, -0.3432876442770270943898878667334192
! 302: 1876 + 3.1415926535897932384626433832795028842*I, 2.133629400974756470719099
! 303: 7873636390948 + 3.1415926535897932384626433832795028842*I, 0.066178301882745
! 304: 732185368492323164193433 + 3.1415926535897932384626433832795028842*I; -1.790
! 305: 3417566977293763292119206302198760, -1.2897619530652735025030086072395031017
! 306: , -0.70148550268542821846861610071436900868, 1.36845553 E-48, -0.50057980363
! 307: 245587382620331339071677436, -1.0888562540123011578605958199158508674, -1.72
! 308: 41634548149836441438434283070556826, 0.3432876442770270943898878667334192187
! 309: 6, -2.1336294009747564707190997873636390948, -0.0661783018827457321853684923
! 310: 23164193433], [[3, [0, 1]~, 1, 1, [1, 1]~], [5, [-1, 1]~, 1, 1, [2, 1]~], [1
! 311: 1, [-1, 1]~, 1, 1, [2, 1]~], [3, [1, 1]~, 1, 1, [0, 1]~], [5, [2, 1]~, 1, 1,
! 312: [-1, 1]~], [11, [2, 1]~, 1, 1, [-1, 1]~], [19, [1, 1]~, 1, 1, [0, 1]~], [17
! 313: , [3, 1]~, 1, 1, [-2, 1]~], [17, [-2, 1]~, 1, 1, [3, 1]~], [19, [0, 1]~, 1,
! 314: 1, [1, 1]~]], 0, [x^2 - x - 57, [2, 0], 229, 1, [[1, -8.06637297521077796359
! 315: 59310246705326058; 1, 7.0663729752107779635959310246705326058], [1, -8.06637
! 316: 29752107779635959310246705326058; 1, 7.0663729752107779635959310246705326058
! 317: ], 0, [2, -1; -1, 115], [229, 115; 0, 1], [115, 1; 1, 2], [229, [115, 1]~]],
! 318: [-7.0663729752107779635959310246705326058, 8.066372975210777963595931024670
! 319: 5326058], [1, x - 1], [1, 1; 0, 1], [1, 0, 0, 57; 0, 1, 1, -1]], [[3, [3], [
! 320: [3, 0; 0, 1]]], 2.7124653051843439746808795106061300699, 0.88144225126545793
! 321: 64, [2, -1], [x + 7], 155], [mat(1), [[0, 0]], [[1.7903417566977293763292119
! 322: 206302198761, -1.7903417566977293763292119206302198760]]], 0]
1.1 noro 323: ? setrand(1);buchreal(10^9-3,0,0.5,0.5)
324: [4, [4], [qfr(3, 1, -83333333, 0.E-48)], 2800.625251907016076486370621737074
1.2 ! noro 325: 5514, 0.9849577285369119736]
1.1 noro 326: ? setrand(1);buchgen(x^4-7,0.2,0.2)
327:
328: [x^4 - 7]
329:
330: [[2, 1]]
331:
332: [[-87808, 1]]
333:
334: [[1, x, x^2, x^3]]
335:
336: [[2, [2], [[3, 1, 2, 1; 0, 1, 0, 0; 0, 0, 1, 0; 0, 0, 0, 1]]]]
337:
338: [14.229975145405511722395637833443108790]
339:
340: [1.121117107152756229]
341:
342: ? setrand(1);buchgenfu(x^2-x-100000)
343: *** Warning: insufficient precision for fundamental units, not given.
344:
345: [x^2 - x - 100000]
346:
347: [[2, 0]]
348:
349: [[400001, 1]]
350:
1.2 ! noro 351: [[1, x - 1]]
1.1 noro 352:
1.2 ! noro 353: [[5, [5], [[2, 0; 0, 1]]]]
1.1 noro 354:
355: [129.82045011403975460991182396195022419]
356:
1.2 ! noro 357: [0.9876536979069047228]
1.1 noro 358:
359: [[2, -1]]
360:
361: [[;]]
362:
363: [-27]
364:
365: ? setrand(1);buchgenforcefu(x^2-x-100000)
366:
367: [x^2 - x - 100000]
368:
369: [[2, 0]]
370:
371: [[400001, 1]]
372:
1.2 ! noro 373: [[1, x - 1]]
1.1 noro 374:
1.2 ! noro 375: [[5, [5], [[2, 0; 0, 1]]]]
1.1 noro 376:
377: [129.82045011403975460991182396195022419]
378:
1.2 ! noro 379: [0.9876536979069047228]
1.1 noro 380:
381: [[2, -1]]
382:
383: [[379554884019013781006303254896369154068336082609238336*x + 119836165644250
384: 789990462835950022871665178127611316131167]]
385:
1.2 ! noro 386: [24]
1.1 noro 387:
388: ? setrand(1);buchgenfu(x^4+24*x^2+585*x+1791,0.1,0.1)
389:
390: [x^4 + 24*x^2 + 585*x + 1791]
391:
392: [[0, 2]]
393:
394: [[18981, 3087]]
395:
1.2 ! noro 396: [[1, -10/1029*x^3 + 13/343*x^2 - 165/343*x - 1135/343, 17/1029*x^3 - 32/1029
! 397: *x^2 + 109/343*x + 2444/343, -11/343*x^3 + 163/1029*x^2 - 373/343*x - 4260/3
! 398: 43]]
1.1 noro 399:
1.2 ! noro 400: [[4, [4], [[7, 2, 4, 0; 0, 1, 0, 0; 0, 0, 1, 0; 0, 0, 0, 1]]]]
1.1 noro 401:
402: [3.7941269688216589341408274220859400302]
403:
1.2 ! noro 404: [0.8826018286655581299]
1.1 noro 405:
406: [[6, 10/1029*x^3 - 13/343*x^2 + 165/343*x + 1478/343]]
407:
1.2 ! noro 408: [[1/343*x^3 - 46/1029*x^2 - 122/343*x - 174/343]]
1.1 noro 409:
1.2 ! noro 410: [154]
1.1 noro 411:
412: ? buchnarrow(bnf)
1.2 ! noro 413: [3, [3], [[3, 0; 0, 1]]]
! 414: ? buchray(bnf,[[5,4;0,1],[1,0]])
! 415: [12, [12], [[3, 0; 0, 1]]]
! 416: ? bnr=buchrayinitgen(bnf,[[5,4;0,1],[1,0]])
1.1 noro 417: [[mat(3), mat([1, 2, 1, 2, 1, 2, 1, 2, 1]), [-2.7124653051843439746808795106
1.2 ! noro 418: 061300698 + 3.1415926535897932384626433832795028842*I; 2.7124653051843439746
! 419: 808795106061300699], [1.7903417566977293763292119206302198761, 1.28976195306
! 420: 52735025030086072395031017 + 3.1415926535897932384626433832795028842*I, 0.70
! 421: 148550268542821846861610071436900868, -1.36845553 E-48, 0.500579803632455873
! 422: 82620331339071677436 + 3.1415926535897932384626433832795028842*I, 1.08885625
! 423: 40123011578605958199158508674, 1.7241634548149836441438434283070556826 + 3.1
! 424: 415926535897932384626433832795028842*I, -0.343287644277027094389887866733419
! 425: 21876 + 3.1415926535897932384626433832795028842*I, 2.13362940097475647071909
! 426: 97873636390948 + 3.1415926535897932384626433832795028842*I, 0.06617830188274
! 427: 5732185368492323164193433 + 3.1415926535897932384626433832795028842*I; -1.79
! 428: 03417566977293763292119206302198760, -1.289761953065273502503008607239503101
! 429: 7, -0.70148550268542821846861610071436900868, 1.36845553 E-48, -0.5005798036
! 430: 3245587382620331339071677436, -1.0888562540123011578605958199158508674, -1.7
! 431: 241634548149836441438434283070556826, 0.343287644277027094389887866733419218
! 432: 76, -2.1336294009747564707190997873636390948, -0.066178301882745732185368492
! 433: 323164193433], [[3, [0, 1]~, 1, 1, [1, 1]~], [5, [-1, 1]~, 1, 1, [2, 1]~], [
! 434: 11, [-1, 1]~, 1, 1, [2, 1]~], [3, [1, 1]~, 1, 1, [0, 1]~], [5, [2, 1]~, 1, 1
! 435: , [-1, 1]~], [11, [2, 1]~, 1, 1, [-1, 1]~], [19, [1, 1]~, 1, 1, [0, 1]~], [1
! 436: 7, [3, 1]~, 1, 1, [-2, 1]~], [17, [-2, 1]~, 1, 1, [3, 1]~], [19, [0, 1]~, 1,
! 437: 1, [1, 1]~]], 0, [x^2 - x - 57, [2, 0], 229, 1, [[1, -8.0663729752107779635
! 438: 959310246705326058; 1, 7.0663729752107779635959310246705326058], [1, -8.0663
! 439: 729752107779635959310246705326058; 1, 7.066372975210777963595931024670532605
! 440: 8], 0, [2, -1; -1, 115], [229, 115; 0, 1], [115, 1; 1, 2], [229, [115, 1]~]]
! 441: , [-7.0663729752107779635959310246705326058, 8.06637297521077796359593102467
! 442: 05326058], [1, x - 1], [1, 1; 0, 1], [1, 0, 0, 57; 0, 1, 1, -1]], [[3, [3],
! 443: [[3, 0; 0, 1]]], 2.7124653051843439746808795106061300699, 0.8814422512654579
! 444: 364, [2, -1], [x + 7], 155], [mat(1), [[0, 0]], [[1.790341756697729376329211
! 445: 9206302198761, -1.7903417566977293763292119206302198760]]], [0, [mat([[6, 1]
! 446: ~, 1])]]], [[[5, 4; 0, 1], [1, 0]], [8, [4, 2], [[2, 0]~, [0, 1]~]], mat([[5
! 447: , [-1, 1]~, 1, 1, [2, 1]~], 1]), [[[[4], [[2, 0]~], [[2, 0]~], [[mod(0, 2)]~
! 448: ], 1]], [[2], [[0, 1]~], mat(1)]], [1, 0; 0, 1]], [1], mat([1, -3, -6]), [12
! 449: , [12], [[3, 0; 0, 1]]], [[1/2, 0; 0, 0], [1, -1; 1, 1]]]
! 450: ? bnr2=buchrayinitgen(bnf,[[25,14;0,1],[1,1]])
1.1 noro 451: [[mat(3), mat([1, 2, 1, 2, 1, 2, 1, 2, 1]), [-2.7124653051843439746808795106
1.2 ! noro 452: 061300698 + 3.1415926535897932384626433832795028842*I; 2.7124653051843439746
! 453: 808795106061300699], [1.7903417566977293763292119206302198761, 1.28976195306
! 454: 52735025030086072395031017 + 3.1415926535897932384626433832795028842*I, 0.70
! 455: 148550268542821846861610071436900868, -1.36845553 E-48, 0.500579803632455873
! 456: 82620331339071677436 + 3.1415926535897932384626433832795028842*I, 1.08885625
! 457: 40123011578605958199158508674, 1.7241634548149836441438434283070556826 + 3.1
! 458: 415926535897932384626433832795028842*I, -0.343287644277027094389887866733419
! 459: 21876 + 3.1415926535897932384626433832795028842*I, 2.13362940097475647071909
! 460: 97873636390948 + 3.1415926535897932384626433832795028842*I, 0.06617830188274
! 461: 5732185368492323164193433 + 3.1415926535897932384626433832795028842*I; -1.79
! 462: 03417566977293763292119206302198760, -1.289761953065273502503008607239503101
! 463: 7, -0.70148550268542821846861610071436900868, 1.36845553 E-48, -0.5005798036
! 464: 3245587382620331339071677436, -1.0888562540123011578605958199158508674, -1.7
! 465: 241634548149836441438434283070556826, 0.343287644277027094389887866733419218
! 466: 76, -2.1336294009747564707190997873636390948, -0.066178301882745732185368492
! 467: 323164193433], [[3, [0, 1]~, 1, 1, [1, 1]~], [5, [-1, 1]~, 1, 1, [2, 1]~], [
! 468: 11, [-1, 1]~, 1, 1, [2, 1]~], [3, [1, 1]~, 1, 1, [0, 1]~], [5, [2, 1]~, 1, 1
! 469: , [-1, 1]~], [11, [2, 1]~, 1, 1, [-1, 1]~], [19, [1, 1]~, 1, 1, [0, 1]~], [1
! 470: 7, [3, 1]~, 1, 1, [-2, 1]~], [17, [-2, 1]~, 1, 1, [3, 1]~], [19, [0, 1]~, 1,
! 471: 1, [1, 1]~]], 0, [x^2 - x - 57, [2, 0], 229, 1, [[1, -8.0663729752107779635
! 472: 959310246705326058; 1, 7.0663729752107779635959310246705326058], [1, -8.0663
! 473: 729752107779635959310246705326058; 1, 7.066372975210777963595931024670532605
! 474: 8], 0, [2, -1; -1, 115], [229, 115; 0, 1], [115, 1; 1, 2], [229, [115, 1]~]]
! 475: , [-7.0663729752107779635959310246705326058, 8.06637297521077796359593102467
! 476: 05326058], [1, x - 1], [1, 1; 0, 1], [1, 0, 0, 57; 0, 1, 1, -1]], [[3, [3],
! 477: [[3, 0; 0, 1]]], 2.7124653051843439746808795106061300699, 0.8814422512654579
! 478: 364, [2, -1], [x + 7], 155], [mat(1), [[0, 0]], [[1.790341756697729376329211
! 479: 9206302198761, -1.7903417566977293763292119206302198760]]], [0, [mat([[6, 1]
! 480: ~, 1])]]], [[[25, 14; 0, 1], [1, 1]], [80, [20, 2, 2], [[2, 0]~, [4, 2]~, [-
! 481: 2, -2]~]], mat([[5, [-1, 1]~, 1, 1, [2, 1]~], 2]), [[[[4], [[2, 0]~], [[2, 0
! 482: ]~], [[mod(0, 2), mod(0, 2)]~], 1], [[5], [[6, 0]~], [[6, 0]~], [[mod(0, 2),
! 483: mod(0, 2)]~], mat([1/5, -14/5])]], [[2, 2], [[4, 2]~, [-2, -2]~], [1, 0; 0,
! 484: 1]]], [1, -12, 0, 0; 0, 0, 1, 0; 0, 0, 0, 1]], [1], mat([1, -3, -6, 0]), [1
! 485: 2, [12], [[3, 0; 0, 1]]], [[1, -18, 9; -1/2, 10, -5], [-2, 0; 0, -10]]]
1.1 noro 486: ? bytesize(%)
1.2 ! noro 487: 6372
1.1 noro 488: ? ceil(-2.5)
489: -2
490: ? centerlift(mod(456,555))
491: -99
492: ? cf(pi)
493: [3, 7, 15, 1, 292, 1, 1, 1, 2, 1, 3, 1, 14, 2, 1, 1, 2, 2, 2, 2, 1, 84, 2, 1
494: , 1, 15, 3, 13, 1, 4, 2, 6, 6]
495: ? cf2([1,3,5,7,9],(exp(1)-1)/(exp(1)+1))
496: [0, 6, 10, 42, 30]
497: ? changevar(x+y,[z,t])
498: y + z
499: ? char([1,2;3,4],z)
500: z^2 - 5*z - 2
501: ? char(mod(x^2+x+1,x^3+5*x+1),z)
502: z^3 + 7*z^2 + 16*z - 19
503: ? char1([1,2;3,4],z)
504: z^2 - 5*z - 2
505: ? char2(mod(1,8191)*[1,2;3,4],z)
506: z^2 + mod(8186, 8191)*z + mod(8189, 8191)
507: ? acurve=chell(acurve,[-1,1,2,3])
508: [-4, -1, -7, -12, -12, 12, 4, 1, -1, 48, -216, 37, 110592/37, [-0.1624345647
1.2 ! noro 509: 1667696455518910092496975959, -0.73040556359455544173706204865073999594, -2.
1.1 noro 510: 1071598716887675937077488504242902444]~, -2.99345864623195962983200997945250
511: 81778, -2.4513893819867900608542248318665252253*I, 0.47131927795681147588259
512: 389708033769964, 1.4354565186686843187232088566788165076*I, 7.33813274078957
513: 67390707210033323055881]
514: ? chinese(mod(7,15),mod(13,21))
515: mod(97, 105)
516: ? apoint=chptell(apoint,[-1,1,2,3])
517: [1, 3]
518: ? isoncurve(acurve,apoint)
519: 1
520: ? classno(-12391)
521: 63
522: ? classno(1345)
523: 6
524: ? classno2(-12391)
525: 63
526: ? classno2(1345)
527: 6
528: ? coeff(sin(x),7)
529: -1/5040
530: ? compimag(qfi(2,1,3),qfi(2,1,3))
531: qfi(2, -1, 3)
532: ? compo(1+o(7^4),3)
533: 1
534: ? compositum(x^4-4*x+2,x^3-x-1)
535: [x^12 - 4*x^10 + 8*x^9 + 12*x^8 + 12*x^7 + 138*x^6 + 132*x^5 - 43*x^4 + 58*x
536: ^2 - 128*x - 5]
537: ? compositum2(x^4-4*x+2,x^3-x-1)
538: [[x^12 - 4*x^10 + 8*x^9 + 12*x^8 + 12*x^7 + 138*x^6 + 132*x^5 - 43*x^4 + 58*
539: x^2 - 128*x - 5, mod(-279140305176/29063006931199*x^11 + 129916611552/290630
540: 06931199*x^10 + 1272919322296/29063006931199*x^9 - 2813750209005/29063006931
541: 199*x^8 - 2859411937992/29063006931199*x^7 - 414533880536/29063006931199*x^6
542: - 35713977492936/29063006931199*x^5 - 17432607267590/29063006931199*x^4 + 4
543: 9785595543672/29063006931199*x^3 + 9423768373204/29063006931199*x^2 - 427797
544: 76146743/29063006931199*x + 37962587857138/29063006931199, x^12 - 4*x^10 + 8
545: *x^9 + 12*x^8 + 12*x^7 + 138*x^6 + 132*x^5 - 43*x^4 + 58*x^2 - 128*x - 5), m
546: od(-279140305176/29063006931199*x^11 + 129916611552/29063006931199*x^10 + 12
547: 72919322296/29063006931199*x^9 - 2813750209005/29063006931199*x^8 - 28594119
548: 37992/29063006931199*x^7 - 414533880536/29063006931199*x^6 - 35713977492936/
549: 29063006931199*x^5 - 17432607267590/29063006931199*x^4 + 49785595543672/2906
550: 3006931199*x^3 + 9423768373204/29063006931199*x^2 - 13716769215544/290630069
551: 31199*x + 37962587857138/29063006931199, x^12 - 4*x^10 + 8*x^9 + 12*x^8 + 12
552: *x^7 + 138*x^6 + 132*x^5 - 43*x^4 + 58*x^2 - 128*x - 5), -1]]
553: ? comprealraw(qfr(5,3,-1,0.),qfr(7,1,-1,0.))
554: qfr(35, 43, 13, 0.E-38)
555: ? concat([1,2],[3,4])
556: [1, 2, 3, 4]
1.2 ! noro 557: ? conductor(bnf,[[25,14;0,1],[1,1]])
! 558: [[[5, 4; 0, 1], [1, 0]], [12, [12], [[3, 0; 0, 1]]], mat(12)]
1.1 noro 559: ? conductorofchar(bnr,[2])
1.2 ! noro 560: [[5, 4; 0, 1], [0, 0]]
1.1 noro 561: ? conj(1+i)
562: 1 - I
563: ? conjvec(mod(x^2+x+1,x^3-x-1))
564: [4.0795956234914387860104177508366260325, 0.46020218825428060699479112458168
565: 698369 + 0.18258225455744299269398828369501930573*I, 0.460202188254280606994
566: 79112458168698369 - 0.18258225455744299269398828369501930573*I]~
567: ? content([123,456,789,234])
568: 3
569: ? convol(sin(x),x*cos(x))
570: x + 1/12*x^3 + 1/2880*x^5 + 1/3628800*x^7 + 1/14631321600*x^9 + 1/1448500838
571: 40000*x^11 + 1/2982752926433280000*x^13 + 1/114000816848279961600000*x^15 +
572: O(x^16)
573: ? core(54713282649239)
574: 5471
575: ? core2(54713282649239)
576: [5471, 100003]
577: ? coredisc(54713282649239)
578: 21884
579: ? coredisc2(54713282649239)
580: [21884, 100003/2]
581: ? cos(1)
582: 0.54030230586813971740093660744297660373
583: ? cosh(1)
584: 1.5430806348152437784779056207570616825
585: ? move(0,200,150)
586: ? cursor(0)
587: ? cvtoi(1.7)
588: 1
589: ? cyclo(105)
590: x^48 + x^47 + x^46 - x^43 - x^42 - 2*x^41 - x^40 - x^39 + x^36 + x^35 + x^34
591: + x^33 + x^32 + x^31 - x^28 - x^26 - x^24 - x^22 - x^20 + x^17 + x^16 + x^1
592: 5 + x^14 + x^13 + x^12 - x^9 - x^8 - 2*x^7 - x^6 - x^5 + x^2 + x + 1
593: ? degree(x^3/(x-1))
594: 2
595: ? denom(12345/54321)
596: 18107
597: ? deplin(mod(1,7)*[2,-1;1,3])
598: [mod(6, 7), mod(5, 7)]~
599: ? deriv((x+y)^5,y)
600: 5*x^4 + 20*y*x^3 + 30*y^2*x^2 + 20*y^3*x + 5*y^4
601: ? ((x+y)^5)'
602: 5*x^4 + 20*y*x^3 + 30*y^2*x^2 + 20*y^3*x + 5*y^4
603: ? det([1,2,3;1,5,6;9,8,7])
604: -30
605: ? det2([1,2,3;1,5,6;9,8,7])
606: -30
607: ? detint([1,2,3;4,5,6])
608: 3
609: ? diagonal([2,4,6])
610:
611: [2 0 0]
612:
613: [0 4 0]
614:
615: [0 0 6]
616:
617: ? dilog(0.5)
618: 0.58224052646501250590265632015968010858
619: ? dz=vector(30,k,1);dd=vector(30,k,k==1);dm=dirdiv(dd,dz)
620: [1, -1, -1, 0, -1, 1, -1, 0, 0, 1, -1, 0, -1, 1, 1, 0, -1, 0, -1, 0, 1, 1, -
621: 1, 0, 0, 1, 0, 0, -1, -1]
622: ? deu=direuler(p=2,100,1/(1-apell(acurve,p)*x+if(acurve[12]%p,p,0)*x^2))
623: [1, -2, -3, 2, -2, 6, -1, 0, 6, 4, -5, -6, -2, 2, 6, -4, 0, -12, 0, -4, 3, 1
624: 0, 2, 0, -1, 4, -9, -2, 6, -12, -4, 8, 15, 0, 2, 12, -1, 0, 6, 0, -9, -6, 2,
625: -10, -12, -4, -9, 12, -6, 2, 0, -4, 1, 18, 10, 0, 0, -12, 8, 12, -8, 8, -6,
626: -8, 4, -30, 8, 0, -6, -4, 9, 0, -1, 2, 3, 0, 5, -12, 4, 8, 9, 18, -15, 6, 0
627: , -4, -18, 0, 4, 24, 2, 4, 12, 18, 0, -24, 4, 12, -30, -2]
628: ? anell(acurve,100)==deu
629: 1
630: ? dirmul(abs(dm),dz)
631: [1, 2, 2, 2, 2, 4, 2, 2, 2, 4, 2, 4, 2, 4, 4, 2, 2, 4, 2, 4, 4, 4, 2, 4, 2,
632: 4, 2, 4, 2, 8]
633: ? dirzetak(initalg(x^3-10*x+8),30)
634: [1, 2, 0, 3, 1, 0, 0, 4, 0, 2, 1, 0, 0, 0, 0, 5, 1, 0, 0, 3, 0, 2, 0, 0, 2,
635: 0, 1, 0, 1, 0]
636: ? disc(x^3+4*x+12)
637: -4144
638: ? discf(x^3+4*x+12)
639: -1036
640: ? discrayabs(bnr,mat(6))
641: [12, 12, 18026977100265125]
642: ? discrayabs(bnr)
643: [24, 12, 40621487921685401825918161408203125]
644: ? discrayabscond(bnr2)
645: 0
646: ? lu=ideallistunitgen(bnf,55);discrayabslist(bnf,lu)
647: [[[6, 6, mat([229, 3])]], [], [[], []], [[]], [[12, 12, [5, 3; 229, 6]], [12
648: , 12, [5, 3; 229, 6]]], [], [], [], [[], [], []], [], [[], []], [[], []], []
649: , [], [[24, 24, [3, 6; 5, 9; 229, 12]], [], [], [24, 24, [3, 6; 5, 9; 229, 1
650: 2]]], [[]], [[], []], [], [[18, 18, [19, 6; 229, 9]], [18, 18, [19, 6; 229,
651: 9]]], [[], []], [], [], [], [], [[], [24, 24, [5, 12; 229, 12]], []], [], [[
652: ], [], [], []], [], [], [], [], [], [[], [12, 12, [3, 3; 11, 3; 229, 6]], [1
653: 2, 12, [3, 3; 11, 3; 229, 6]], []], [], [], [[18, 18, [2, 12; 3, 12; 229, 9]
654: ], [], [18, 18, [2, 12; 3, 12; 229, 9]]], [[12, 12, [37, 3; 229, 6]], [12, 1
655: 2, [37, 3; 229, 6]]], [], [], [], [], [], [[], []], [[], []], [[], [], [], [
656: ], [], []], [], [], [[12, 12, [2, 12; 3, 3; 229, 6]], [12, 12, [2, 12; 3, 3;
657: 229, 6]]], [[18, 18, [7, 12; 229, 9]]], [], [[], [], [], []], [], [[], []],
658: [], [[], [24, 24, [5, 9; 11, 6; 229, 12]], [24, 24, [5, 9; 11, 6; 229, 12]]
659: , []]]
660: ? discrayabslistlong(bnf,20)
661: [[[[matrix(0,2,j,k,0), 6, 6, mat([229, 3])]], [], [[mat([12, 1]), 0, 0, 0],
662: [mat([13, 1]), 0, 0, 0]], [[mat([10, 1]), 0, 0, 0]], [[mat([20, 1]), 12, 12,
663: [5, 3; 229, 6]], [mat([21, 1]), 12, 12, [5, 3; 229, 6]]], [], [], [], [[mat
664: ([12, 2]), 0, 0, 0], [[12, 1; 13, 1], 0, 0, 0], [mat([13, 2]), 0, 0, 0]], []
665: , [[mat([44, 1]), 0, 0, 0], [mat([45, 1]), 0, 0, 0]], [[[10, 1; 12, 1], 0, 0
666: , 0], [[10, 1; 13, 1], 0, 0, 0]], [], [], [[[12, 1; 20, 1], 24, 24, [3, 6; 5
667: , 9; 229, 12]], [[13, 1; 20, 1], 0, 0, 0], [[12, 1; 21, 1], 0, 0, 0], [[13,
668: 1; 21, 1], 24, 24, [3, 6; 5, 9; 229, 12]]], [[mat([10, 2]), 0, 0, 0]], [[mat
669: ([68, 1]), 0, 0, 0], [mat([69, 1]), 0, 0, 0]], [], [[mat([76, 1]), 18, 18, [
670: 19, 6; 229, 9]], [mat([77, 1]), 18, 18, [19, 6; 229, 9]]], [[[10, 1; 20, 1],
671: 0, 0, 0], [[10, 1; 21, 1], 0, 0, 0]]]]
672: ? discrayrel(bnr,mat(6))
1.2 ! noro 673: [6, 2, [125, 14; 0, 1]]
1.1 noro 674: ? discrayrel(bnr)
1.2 ! noro 675: [12, 1, [1953125, 1160889; 0, 1]]
1.1 noro 676: ? discrayrelcond(bnr2)
677: 0
678: ? divisors(8!)
679: [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 15, 16, 18, 20, 21, 24, 28, 30, 32,
680: 35, 36, 40, 42, 45, 48, 56, 60, 63, 64, 70, 72, 80, 84, 90, 96, 105, 112, 12
681: 0, 126, 128, 140, 144, 160, 168, 180, 192, 210, 224, 240, 252, 280, 288, 315
682: , 320, 336, 360, 384, 420, 448, 480, 504, 560, 576, 630, 640, 672, 720, 840,
683: 896, 960, 1008, 1120, 1152, 1260, 1344, 1440, 1680, 1920, 2016, 2240, 2520,
684: 2688, 2880, 3360, 4032, 4480, 5040, 5760, 6720, 8064, 10080, 13440, 20160,
685: 40320]
686: ? divres(345,123)
687: [2, 99]~
688: ? divres(x^7-1,x^5+1)
689: [x^2, -x^2 - 1]~
690: ? divsum(8!,x,x)
691: 159120
692: ? postdraw([0,0,0])
693: ? eigen([1,2,3;4,5,6;7,8,9])
694:
695: [-1.2833494518006402717978106547571267252 1 0.283349451800640271797810654757
696: 12672521]
697:
698: [-0.14167472590032013589890532737856336260 -2 0.6416747259003201358989053273
699: 7856336260]
700:
701: [1 1 1]
702:
703: ? eint1(2)
704: 0.048900510708061119567239835228049522206
705: ? erfc(2)
706: 0.0046777349810472658379307436327470713891
707: ? eta(q)
708: 1 - q - q^2 + q^5 + q^7 - q^12 - q^15 + O(q^16)
709: ? euler
710: 0.57721566490153286060651209008240243104
711: ? z=y;y=x;eval(z)
712: x
713: ? exp(1)
714: 2.7182818284590452353602874713526624977
715: ? extract([1,2,3,4,5,6,7,8,9,10],1000)
716: [4, 6, 7, 8, 9, 10]
717: ? 10!
718: 3628800
719: ? fact(10)
720: 3628800.0000000000000000000000000000000
721: ? factcantor(x^11+1,7)
722:
723: [mod(1, 7)*x + mod(1, 7) 1]
724:
725: [mod(1, 7)*x^10 + mod(6, 7)*x^9 + mod(1, 7)*x^8 + mod(6, 7)*x^7 + mod(1, 7)*
726: x^6 + mod(6, 7)*x^5 + mod(1, 7)*x^4 + mod(6, 7)*x^3 + mod(1, 7)*x^2 + mod(6,
727: 7)*x + mod(1, 7) 1]
728:
729: ? centerlift(lift(factfq(x^3+x^2+x-1,3,t^3+t^2+t-1)))
730:
731: [x - t 1]
732:
733: [x + (t^2 + t - 1) 1]
734:
735: [x + (-t^2 - 1) 1]
736:
737: ? factmod(x^11+1,7)
738:
739: [mod(1, 7)*x + mod(1, 7) 1]
740:
741: [mod(1, 7)*x^10 + mod(6, 7)*x^9 + mod(1, 7)*x^8 + mod(6, 7)*x^7 + mod(1, 7)*
742: x^6 + mod(6, 7)*x^5 + mod(1, 7)*x^4 + mod(6, 7)*x^3 + mod(1, 7)*x^2 + mod(6,
743: 7)*x + mod(1, 7) 1]
744:
745: ? factor(17!+1)
746:
747: [661 1]
748:
749: [537913 1]
750:
751: [1000357 1]
752:
753: ? p=x^5+3021*x^4-786303*x^3-6826636057*x^2-546603588746*x+3853890514072057
754: x^5 + 3021*x^4 - 786303*x^3 - 6826636057*x^2 - 546603588746*x + 385389051407
755: 2057
756: ? fa=[11699,6;2392997,2;4987333019653,2]
757:
758: [11699 6]
759:
760: [2392997 2]
761:
762: [4987333019653 2]
763:
764: ? factoredbasis(p,fa)
765: [1, x, x^2, 1/11699*x^3 + 1847/11699*x^2 - 132/11699*x - 2641/11699, 1/13962
766: 3738889203638909659*x^4 - 1552451622081122020/139623738889203638909659*x^3 +
767: 418509858130821123141/139623738889203638909659*x^2 - 6810913798507599407313
768: 4/139623738889203638909659*x - 13185339461968406/58346808996920447]
769: ? factoreddiscf(p,fa)
770: 136866601
771: ? factoredpolred(p,fa)
772: [x - 1, x^5 - 2*x^4 - 62*x^3 + 85*x^2 + 818*x + 1, x^5 - 2*x^4 - 53*x^3 - 46
773: *x^2 + 508*x + 913, x^5 - 2*x^4 - 13*x^3 + 37*x^2 - 21*x - 1, x^5 - x^4 - 52
774: *x^3 - 197*x^2 - 273*x - 127]
775: ? factoredpolred2(p,fa)
1.2 ! noro 776: [x - 1, x^5 - 2*x^4 - 62*x^3 + 85*x^2 + 818*x + 1, x^5 - 2*x^4 - 53*x^3 - 46
! 777: *x^2 + 508*x + 913, x^5 - 2*x^4 - 13*x^3 + 37*x^2 - 21*x - 1, x^5 - x^4 - 52
! 778: *x^3 - 197*x^2 - 273*x - 127]
1.1 noro 779: ? factornf(x^3+x^2-2*x-1,t^3+t^2-2*t-1)
780:
781: [mod(1, t^3 + t^2 - 2*t - 1)*x + mod(-t, t^3 + t^2 - 2*t - 1) 1]
782:
783: [mod(1, t^3 + t^2 - 2*t - 1)*x + mod(-t^2 + 2, t^3 + t^2 - 2*t - 1) 1]
784:
785: [mod(1, t^3 + t^2 - 2*t - 1)*x + mod(t^2 + t - 1, t^3 + t^2 - 2*t - 1) 1]
786:
787: ? factorpadic(apol,7,8)
788:
789: [(1 + O(7^8))*x + (6 + 2*7^2 + 2*7^3 + 3*7^4 + 2*7^5 + 6*7^6 + O(7^8)) 1]
790:
791: [(1 + O(7^8))*x^2 + (1 + 6*7 + 4*7^2 + 4*7^3 + 3*7^4 + 4*7^5 + 6*7^7 + O(7^8
792: ))*x + (6 + 5*7 + 3*7^2 + 6*7^3 + 7^4 + 3*7^5 + 2*7^6 + 5*7^7 + O(7^8)) 1]
793:
794: ? factorpadic2(apol,7,8)
795:
796: [(1 + O(7^8))*x + (6 + 2*7^2 + 2*7^3 + 3*7^4 + 2*7^5 + 6*7^6 + O(7^8)) 1]
797:
798: [(1 + O(7^8))*x^2 + (1 + 6*7 + 4*7^2 + 4*7^3 + 3*7^4 + 4*7^5 + 6*7^7 + O(7^8
799: ))*x + (6 + 5*7 + 3*7^2 + 6*7^3 + 7^4 + 3*7^5 + 2*7^6 + 5*7^7 + O(7^8)) 1]
800:
801: ? factpol(x^15-1,3,1)
802:
803: [x - 1 1]
804:
805: [x^2 + x + 1 1]
806:
807: [x^4 + x^3 + x^2 + x + 1 1]
808:
809: [x^8 - x^7 + x^5 - x^4 + x^3 - x + 1 1]
810:
811: ? factpol(x^15-1,0,1)
812:
813: [x - 1 1]
814:
815: [x^2 + x + 1 1]
816:
817: [x^4 + x^3 + x^2 + x + 1 1]
818:
819: [x^8 - x^7 + x^5 - x^4 + x^3 - x + 1 1]
820:
821: ? factpol2(x^15-1,0)
822: *** this function has been suppressed.
823: ? fibo(100)
824: 354224848179261915075
825: ? floor(-1/2)
826: -1
827: ? floor(-2.5)
828: -3
829: ? for(x=1,5,print(x!))
830: 1
831: 2
832: 6
833: 24
834: 120
835: ? fordiv(10,x,print(x))
836: 1
837: 2
838: 5
839: 10
840: ? forprime(p=1,30,print(p))
841: 2
842: 3
843: 5
844: 7
845: 11
846: 13
847: 17
848: 19
849: 23
850: 29
851: ? forstep(x=0,pi,pi/12,print(sin(x)))
852: 0.E-38
853: 0.25881904510252076234889883762404832834
854: 0.49999999999999999999999999999999999999
855: 0.70710678118654752440084436210484903928
1.2 ! noro 856: 0.86602540378443864676372317075293618347
1.1 noro 857: 0.96592582628906828674974319972889736763
858: 1.0000000000000000000000000000000000000
859: 0.96592582628906828674974319972889736764
860: 0.86602540378443864676372317075293618348
861: 0.70710678118654752440084436210484903930
862: 0.50000000000000000000000000000000000002
863: 0.25881904510252076234889883762404832838
864: 4.7019774032891500318749461488889827112 E-38
865: ? forvec(x=[[1,3],[-2,2]],print1([x[1],x[2]]," "));print(" ");
866: [1, -2] [1, -1] [1, 0] [1, 1] [1, 2] [2, -2] [2, -1] [2, 0] [2, 1] [2, 2] [3
867: , -2] [3, -1] [3, 0] [3, 1] [3, 2]
868: ? frac(-2.7)
869: 0.30000000000000000000000000000000000000
870: ? galois(x^6-3*x^2-1)
871: [12, 1, 1]
872: ? nf3=initalg(x^6+108);galoisconj(nf3)
873: [-x, x, -1/12*x^4 - 1/2*x, -1/12*x^4 + 1/2*x, 1/12*x^4 - 1/2*x, 1/12*x^4 + 1
874: /2*x]~
875: ? aut=%[2];galoisapply(nf3,aut,mod(x^5,x^6+108))
876: mod(x^5, x^6 + 108)
877: ? gamh(10)
878: 1133278.3889487855673345741655888924755
879: ? gamma(10.5)
880: 1133278.3889487855673345741655888924755
881: ? gauss(hilbert(10),[1,2,3,4,5,6,7,8,9,0]~)
882: [9236800, -831303990, 18288515520, -170691240720, 832112321040, -23298940665
883: 00, 3883123564320, -3803844432960, 2020775945760, -449057772020]~
884: ? gaussmodulo([2,3;5,4],[7,11],[1,4]~)
885: [-5, -1]~
886: ? gaussmodulo2([2,3;5,4],[7,11],[1,4]~)
887: [[-5, -1]~, [-77, 723; 0, 1]]
888: ? gcd(12345678,87654321)
889: 9
890: ? getheap()
1.2 ! noro 891: [215, 44753]
1.1 noro 892: ? getrand()
1.2 ! noro 893: 498199132
1.1 noro 894: ? getstack()
895: 0
896: ? globalred(acurve)
897: [37, [1, -1, 2, 2], 1]
898: ? getstack()
899: 0
900: ? hclassno(2000003)
901: 357
902: ? hell(acurve,apoint)
903: 0.40889126591975072188708879805553617287
904: ? hell2(acurve,apoint)
905: 0.40889126591975072188708879805553617296
906: ? hermite(amat=1/hilbert(7))
907:
908: [420 0 0 0 210 168 175]
909:
910: [0 840 0 0 0 0 504]
911:
912: [0 0 2520 0 0 0 1260]
913:
914: [0 0 0 2520 0 0 840]
915:
916: [0 0 0 0 13860 0 6930]
917:
918: [0 0 0 0 0 5544 0]
919:
920: [0 0 0 0 0 0 12012]
921:
922: ? hermite2(amat)
923: [[420, 0, 0, 0, 210, 168, 175; 0, 840, 0, 0, 0, 0, 504; 0, 0, 2520, 0, 0, 0,
924: 1260; 0, 0, 0, 2520, 0, 0, 840; 0, 0, 0, 0, 13860, 0, 6930; 0, 0, 0, 0, 0,
925: 5544, 0; 0, 0, 0, 0, 0, 0, 12012], [420, 420, 840, 630, 2982, 1092, 4159; 21
926: 0, 280, 630, 504, 2415, 876, 3395; 140, 210, 504, 420, 2050, 749, 2901; 105,
927: 168, 420, 360, 1785, 658, 2542; 84, 140, 360, 315, 1582, 588, 2266; 70, 120
928: , 315, 280, 1421, 532, 2046; 60, 105, 280, 252, 1290, 486, 1866]]
929: ? hermitehavas(amat)
930: *** this function has been suppressed.
931: ? hermitemod(amat,detint(amat))
932:
933: [420 0 0 0 210 168 175]
934:
935: [0 840 0 0 0 0 504]
936:
937: [0 0 2520 0 0 0 1260]
938:
939: [0 0 0 2520 0 0 840]
940:
941: [0 0 0 0 13860 0 6930]
942:
943: [0 0 0 0 0 5544 0]
944:
945: [0 0 0 0 0 0 12012]
946:
947: ? hermiteperm(amat)
948: [[360360, 0, 0, 0, 0, 144144, 300300; 0, 27720, 0, 0, 0, 0, 22176; 0, 0, 277
949: 20, 0, 0, 0, 6930; 0, 0, 0, 2520, 0, 0, 840; 0, 0, 0, 0, 2520, 0, 1260; 0, 0
950: , 0, 0, 0, 168, 0; 0, 0, 0, 0, 0, 0, 7], [51480, 4620, 5544, 630, 840, 20676
951: , 48619; 45045, 3960, 4620, 504, 630, 18074, 42347; 40040, 3465, 3960, 420,
952: 504, 16058, 37523; 36036, 3080, 3465, 360, 420, 14448, 33692; 32760, 2772, 3
953: 080, 315, 360, 13132, 30574; 30030, 2520, 2772, 280, 315, 12036, 27986; 2772
954: 0, 2310, 2520, 252, 280, 11109, 25803], [7, 6, 5, 4, 3, 2, 1]]
955: ? hess(hilbert(7))
956:
957: [1 90281/58800 -1919947/4344340 4858466341/1095033030 -77651417539/819678732
958: 6 3386888964/106615355 1/2]
959:
960: [1/3 43/48 38789/5585580 268214641/109503303 -581330123627/126464718744 4365
961: 450643/274153770 1/4]
962:
963: [0 217/2880 442223/7447440 53953931/292008808 -32242849453/168619624992 1475
964: 457901/1827691800 1/80]
965:
966: [0 0 1604444/264539275 24208141/149362505292 847880210129/47916076768560 -45
967: 44407141/103873817300 -29/40920]
968:
969: [0 0 0 9773092581/35395807550620 -24363634138919/107305824577186620 72118203
970: 606917/60481351061158500 55899/3088554700]
971:
972: [0 0 0 0 67201501179065/8543442888354179988 -9970556426629/74082861999267660
973: 0 -3229/13661312210]
974:
975: [0 0 0 0 0 -258198800769/9279048099409000 -13183/38381527800]
976:
977: ? hilb(2/3,3/4,5)
978: 1
979: ? hilbert(5)
980:
981: [1 1/2 1/3 1/4 1/5]
982:
983: [1/2 1/3 1/4 1/5 1/6]
984:
985: [1/3 1/4 1/5 1/6 1/7]
986:
987: [1/4 1/5 1/6 1/7 1/8]
988:
989: [1/5 1/6 1/7 1/8 1/9]
990:
991: ? hilbp(mod(5,7),mod(6,7))
992: 1
993: ? hvector(10,x,1/x)
994: [1, 1/2, 1/3, 1/4, 1/5, 1/6, 1/7, 1/8, 1/9, 1/10]
995: ? hyperu(1,1,1)
996: 0.59634736232319407434107849936927937488
997: ? i^2
998: -1
999: ? nf1=initalgred(nfpol)
1000: [x^5 - 2*x^4 + 3*x^3 + 8*x^2 + 3*x + 2, [1, 2], 595125, 4, [[1, -1.089115145
1.2 ! noro 1001: 7205048250249527946671612684, 2.4285174907194186068992069565359418363, -0.71
! 1002: 946691128913178943997506477288225737, 2.555820035069169495064607115942677997
! 1003: 0; 1, -0.13838372073406036365047976417441696637 + 0.491816376577686434997532
! 1004: 85514741525107*I, -1.9647119211288133163138753392090569931 + 0.8097149241889
! 1005: 7895128294082219556466856*I, 0.072312766896812300380582649294307897128 + 2.1
! 1006: 980803753846276641195195160383234877*I, 0.9879631935250703980395053973545283
! 1007: 7195 + 1.5701452385894131769052374806001981108*I; 1, 1.682941293594312776162
! 1008: 9561615079976005 + 2.0500351226010726172974286983598602163*I, 0.750453175769
! 1009: 10401286427186094108607491 - 1.3101462685358123283560773619310445914*I, 0.78
! 1010: 742068874775359433940488309213323161 - 2.13366338931266180341684546104579360
! 1011: 16*I, -1.2658732110596551455718089553258673704 + 2.7164790103743150566578028
! 1012: 035789834835*I], [1, -1.0891151457205048250249527946671612684, 2.42851749071
! 1013: 94186068992069565359418363, -0.71946691128913178943997506477288225737, 2.555
! 1014: 8200350691694950646071159426779970; 1.4142135623730950488016887242096980785,
! 1015: -0.19570413467375904264179382543977540673, -2.77852224501646643099209256540
! 1016: 93065576, 0.10226569567819614506098907018896260036, 1.3971909474085893198147
! 1017: 151262541540506; 0, 0.69553338995335755797766403996841143190, 1.145109827443
! 1018: 9565129926149974389115722, 3.1085550780550843138423672171643499921, 2.220520
! 1019: 6913086872788181483285734827868; 1.4142135623730950488016887242096980785, 2.
! 1020: 3800384020787979181834702019470475018, 1.06130105909862703981823187865589944
! 1021: 13, 1.1135810173202366904448352912286604471, -1.7902150633253437253677889164
! 1022: 811036159; 0, 2.8991874737236275652408825679737171587, -1.852826621655848763
! 1023: 4446810512816401034, -3.0174557027049114270734649132936867271, 3.84168145837
! 1024: 31999185306312841432940662], 0, [5, 2, 0, 1, 2; 2, -2, 5, 10, -20; 0, 5, 10,
! 1025: -10, 5; 1, 10, -10, -17, 1; 2, -20, 5, 1, -8], [345, 0, 145, 235, 168; 0, 3
! 1026: 45, 250, 344, 200; 0, 0, 5, 4, 3; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1], [108675, 51
! 1027: 75, 0, 10350, 15525; 5175, 13800, 8625, 1725, -27600; 0, 8625, 37950, -17250
! 1028: , 0; 10350, 1725, -17250, -24150, -15525; 15525, -27600, 0, -15525, -3450],
! 1029: [595125, [-238050, 296700, 91425, 1725, 0]~]], [-1.0891151457205048250249527
! 1030: 946671612684, -0.13838372073406036365047976417441696637 + 0.4918163765776864
! 1031: 3499753285514741525107*I, 1.6829412935943127761629561615079976005 + 2.050035
! 1032: 1226010726172974286983598602163*I], [1, x, 1/2*x^4 - 3/2*x^3 + 5/2*x^2 + 2*x
! 1033: - 1, 1/2*x^4 - x^3 + x^2 + 9/2*x + 1, 1/2*x^4 - x^3 + 2*x^2 + 7/2*x + 2], [
! 1034: 1, 0, -1, -7, -14; 0, 1, 1, -2, -15; 0, 0, 0, -2, -4; 0, 0, -1, -1, 2; 0, 0,
! 1035: 1, 3, 4], [1, 0, 0, 0, 0, 0, -1, 1, 2, -4, 0, 1, 3, -1, 1, 0, 2, -1, -3, -1
! 1036: , 0, -4, 1, -1, -1; 0, 1, 0, 0, 0, 1, 1, 1, 1, -1, 0, 1, -2, -1, 1, 0, 1, -1
! 1037: , -1, 3, 0, -1, 1, 3, -3; 0, 0, 1, 0, 0, 0, 0, 0, 1, -1, 1, 0, 0, 0, 2, 0, 1
! 1038: , 0, 1, 1, 0, -1, 2, 1, 1; 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0, 0, -1, -1, -2,
! 1039: 1, 0, -1, 0, 0, 0, 0, -2, 0, 1; 0, 0, 0, 0, 1, 0, 1, -1, -1, 1, 0, -1, 0, -1
! 1040: , 0, 0, -1, -1, 0, 0, 1, 1, 0, 0, 1]]
1.1 noro 1041: ? initalgred2(nfpol)
1042: [[x^5 - 2*x^4 + 3*x^3 + 8*x^2 + 3*x + 2, [1, 2], 595125, 4, [[1, -1.08911514
1.2 ! noro 1043: 57205048250249527946671612684, 2.4285174907194186068992069565359418363, -0.7
! 1044: 1946691128913178943997506477288225737, 2.55582003506916949506460711594267799
! 1045: 70; 1, -0.13838372073406036365047976417441696637 + 0.49181637657768643499753
! 1046: 285514741525107*I, -1.9647119211288133163138753392090569931 + 0.809714924188
! 1047: 97895128294082219556466856*I, 0.072312766896812300380582649294307897128 + 2.
! 1048: 1980803753846276641195195160383234877*I, 0.987963193525070398039505397354528
! 1049: 37195 + 1.5701452385894131769052374806001981108*I; 1, 1.68294129359431277616
! 1050: 29561615079976005 + 2.0500351226010726172974286983598602163*I, 0.75045317576
! 1051: 910401286427186094108607491 - 1.3101462685358123283560773619310445914*I, 0.7
! 1052: 8742068874775359433940488309213323161 - 2.1336633893126618034168454610457936
! 1053: 016*I, -1.2658732110596551455718089553258673704 + 2.716479010374315056657802
! 1054: 8035789834835*I], [1, -1.0891151457205048250249527946671612684, 2.4285174907
! 1055: 194186068992069565359418363, -0.71946691128913178943997506477288225737, 2.55
! 1056: 58200350691694950646071159426779970; 1.4142135623730950488016887242096980785
! 1057: , -0.19570413467375904264179382543977540673, -2.7785222450164664309920925654
! 1058: 093065576, 0.10226569567819614506098907018896260036, 1.397190947408589319814
! 1059: 7151262541540506; 0, 0.69553338995335755797766403996841143190, 1.14510982744
! 1060: 39565129926149974389115722, 3.1085550780550843138423672171643499921, 2.22052
! 1061: 06913086872788181483285734827868; 1.4142135623730950488016887242096980785, 2
! 1062: .3800384020787979181834702019470475018, 1.0613010590986270398182318786558994
! 1063: 413, 1.1135810173202366904448352912286604471, -1.790215063325343725367788916
! 1064: 4811036159; 0, 2.8991874737236275652408825679737171587, -1.85282662165584876
! 1065: 34446810512816401034, -3.0174557027049114270734649132936867271, 3.8416814583
! 1066: 731999185306312841432940662], 0, [5, 2, 0, 1, 2; 2, -2, 5, 10, -20; 0, 5, 10
! 1067: , -10, 5; 1, 10, -10, -17, 1; 2, -20, 5, 1, -8], [345, 0, 145, 235, 168; 0,
! 1068: 345, 250, 344, 200; 0, 0, 5, 4, 3; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1], [108675, 5
! 1069: 175, 0, 10350, 15525; 5175, 13800, 8625, 1725, -27600; 0, 8625, 37950, -1725
! 1070: 0, 0; 10350, 1725, -17250, -24150, -15525; 15525, -27600, 0, -15525, -3450],
! 1071: [595125, [-238050, 296700, 91425, 1725, 0]~]], [-1.089115145720504825024952
! 1072: 7946671612684, -0.13838372073406036365047976417441696637 + 0.491816376577686
! 1073: 43499753285514741525107*I, 1.6829412935943127761629561615079976005 + 2.05003
! 1074: 51226010726172974286983598602163*I], [1, x, 1/2*x^4 - 3/2*x^3 + 5/2*x^2 + 2*
! 1075: x - 1, 1/2*x^4 - x^3 + x^2 + 9/2*x + 1, 1/2*x^4 - x^3 + 2*x^2 + 7/2*x + 2],
! 1076: [1, 0, -1, -7, -14; 0, 1, 1, -2, -15; 0, 0, 0, -2, -4; 0, 0, -1, -1, 2; 0, 0
! 1077: , 1, 3, 4], [1, 0, 0, 0, 0, 0, -1, 1, 2, -4, 0, 1, 3, -1, 1, 0, 2, -1, -3, -
! 1078: 1, 0, -4, 1, -1, -1; 0, 1, 0, 0, 0, 1, 1, 1, 1, -1, 0, 1, -2, -1, 1, 0, 1, -
! 1079: 1, -1, 3, 0, -1, 1, 3, -3; 0, 0, 1, 0, 0, 0, 0, 0, 1, -1, 1, 0, 0, 0, 2, 0,
! 1080: 1, 0, 1, 1, 0, -1, 2, 1, 1; 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0, 0, -1, -1, -2,
! 1081: 1, 0, -1, 0, 0, 0, 0, -2, 0, 1; 0, 0, 0, 0, 1, 0, 1, -1, -1, 1, 0, -1, 0, -
! 1082: 1, 0, 0, -1, -1, 0, 0, 1, 1, 0, 0, 1]], mod(-1/2*x^4 + 3/2*x^3 - 5/2*x^2 - 2
! 1083: *x + 1, x^5 - 2*x^4 + 3*x^3 + 8*x^2 + 3*x + 2)]
1.1 noro 1084: ? vp=primedec(nf,3)[1]
1.2 ! noro 1085: [3, [1, 0, 1, 0, 0]~, 1, 1, [1, -1, -1, -1, 0]~]
1.1 noro 1086: ? idx=idealmul(nf,idmat(5),vp)
1087:
1.2 ! noro 1088: [3 2 1 0 1]
1.1 noro 1089:
1090: [0 1 0 0 0]
1091:
1092: [0 0 1 0 0]
1093:
1094: [0 0 0 1 0]
1095:
1096: [0 0 0 0 1]
1097:
1098: ? idealinv(nf,idx)
1099:
1.2 ! noro 1100: [1 0 0 2/3 0]
1.1 noro 1101:
1.2 ! noro 1102: [0 1 0 1/3 0]
1.1 noro 1103:
1.2 ! noro 1104: [0 0 1 1/3 0]
1.1 noro 1105:
1.2 ! noro 1106: [0 0 0 1/3 0]
1.1 noro 1107:
1108: [0 0 0 0 1]
1109:
1110: ? idy=ideallllred(nf,idx,[1,5,6])
1111:
1.2 ! noro 1112: [5 0 0 0 2]
1.1 noro 1113:
1.2 ! noro 1114: [0 5 0 0 2]
1.1 noro 1115:
1.2 ! noro 1116: [0 0 5 0 1]
1.1 noro 1117:
1.2 ! noro 1118: [0 0 0 5 2]
1.1 noro 1119:
1.2 ! noro 1120: [0 0 0 0 1]
1.1 noro 1121:
1122: ? idealadd(nf,idx,idy)
1123:
1124: [1 0 0 0 0]
1125:
1126: [0 1 0 0 0]
1127:
1128: [0 0 1 0 0]
1129:
1130: [0 0 0 1 0]
1131:
1132: [0 0 0 0 1]
1133:
1134: ? idealaddone(nf,idx,idy)
1.2 ! noro 1135: [[3, 2, 1, 2, 1]~, [-2, -2, -1, -2, -1]~]
1.1 noro 1136: ? idealaddmultone(nf,[idy,idx])
1137: [[-5, 0, 0, 0, 0]~, [6, 0, 0, 0, 0]~]
1138: ? idealappr(nf,idy)
1.2 ! noro 1139: [-2, -2, -1, -2, -1]~
1.1 noro 1140: ? idealapprfact(nf,idealfactor(nf,idy))
1.2 ! noro 1141: [-2, -2, -1, -2, -1]~
1.1 noro 1142: ? idealcoprime(nf,idx,idx)
1.2 ! noro 1143: [1/3, -1/3, -1/3, -1/3, 0]~
1.1 noro 1144: ? idz=idealintersect(nf,idx,idy)
1145:
1.2 ! noro 1146: [15 10 5 0 12]
1.1 noro 1147:
1.2 ! noro 1148: [0 5 0 0 2]
1.1 noro 1149:
1.2 ! noro 1150: [0 0 5 0 1]
1.1 noro 1151:
1.2 ! noro 1152: [0 0 0 5 2]
1.1 noro 1153:
1.2 ! noro 1154: [0 0 0 0 1]
1.1 noro 1155:
1156: ? idealfactor(nf,idz)
1157:
1.2 ! noro 1158: [[3, [1, 0, 1, 0, 0]~, 1, 1, [1, -1, -1, -1, 0]~] 1]
1.1 noro 1159:
1.2 ! noro 1160: [[5, [-1, 0, 0, 0, 1]~, 1, 1, [2, 0, 3, 0, 1]~] 1]
1.1 noro 1161:
1.2 ! noro 1162: [[5, [2, 0, 0, 0, 1]~, 4, 1, [2, 2, 1, 2, 1]~] 3]
1.1 noro 1163:
1164: ? ideallist(bnf,20)
1.2 ! noro 1165: [[[1, 0; 0, 1]], [], [[3, 0; 0, 1], [3, 1; 0, 1]], [[2, 0; 0, 2]], [[5, 4; 0
! 1166: , 1], [5, 2; 0, 1]], [], [], [], [[9, 6; 0, 1], [3, 0; 0, 3], [9, 4; 0, 1]],
! 1167: [], [[11, 10; 0, 1], [11, 2; 0, 1]], [[6, 0; 0, 2], [6, 2; 0, 2]], [], [],
! 1168: [[15, 9; 0, 1], [15, 4; 0, 1], [15, 12; 0, 1], [15, 7; 0, 1]], [[4, 0; 0, 4]
! 1169: ], [[17, 15; 0, 1], [17, 3; 0, 1]], [], [[19, 0; 0, 1], [19, 1; 0, 1]], [[10
! 1170: , 8; 0, 2], [10, 4; 0, 2]]]
1.1 noro 1171: ? idx2=idealmul(nf,idx,idx)
1172:
1.2 ! noro 1173: [9 5 7 0 4]
1.1 noro 1174:
1175: [0 1 0 0 0]
1176:
1177: [0 0 1 0 0]
1178:
1179: [0 0 0 1 0]
1180:
1181: [0 0 0 0 1]
1182:
1183: ? idt=idealmulred(nf,idx,idx)
1184:
1.2 ! noro 1185: [2 0 0 0 0]
1.1 noro 1186:
1.2 ! noro 1187: [0 2 0 0 0]
1.1 noro 1188:
1189: [0 0 2 0 0]
1190:
1191: [0 0 0 2 1]
1192:
1193: [0 0 0 0 1]
1194:
1195: ? idealdiv(nf,idy,idt)
1196:
1.2 ! noro 1197: [5 0 5/2 0 1]
1.1 noro 1198:
1.2 ! noro 1199: [0 5/2 0 0 1]
1.1 noro 1200:
1.2 ! noro 1201: [0 0 5/2 0 1/2]
1.1 noro 1202:
1.2 ! noro 1203: [0 0 0 5/2 1]
1.1 noro 1204:
1.2 ! noro 1205: [0 0 0 0 1/2]
1.1 noro 1206:
1207: ? idealdivexact(nf,idx2,idx)
1208:
1.2 ! noro 1209: [3 2 1 0 1]
1.1 noro 1210:
1211: [0 1 0 0 0]
1212:
1213: [0 0 1 0 0]
1214:
1215: [0 0 0 1 0]
1216:
1217: [0 0 0 0 1]
1218:
1219: ? idealhermite(nf,vp)
1220:
1.2 ! noro 1221: [3 2 1 0 1]
1.1 noro 1222:
1223: [0 1 0 0 0]
1224:
1225: [0 0 1 0 0]
1226:
1227: [0 0 0 1 0]
1228:
1229: [0 0 0 0 1]
1230:
1231: ? idealhermite2(nf,vp[2],3)
1232:
1.2 ! noro 1233: [3 2 1 0 1]
1.1 noro 1234:
1235: [0 1 0 0 0]
1236:
1237: [0 0 1 0 0]
1238:
1239: [0 0 0 1 0]
1240:
1241: [0 0 0 0 1]
1242:
1243: ? idealnorm(nf,idt)
1244: 16
1245: ? idp=idealpow(nf,idx,7)
1246:
1.2 ! noro 1247: [2187 1436 1807 630 1822]
1.1 noro 1248:
1249: [0 1 0 0 0]
1250:
1251: [0 0 1 0 0]
1252:
1253: [0 0 0 1 0]
1254:
1255: [0 0 0 0 1]
1256:
1257: ? idealpowred(nf,idx,7)
1258:
1.2 ! noro 1259: [2 0 0 0 0]
1.1 noro 1260:
1.2 ! noro 1261: [0 2 0 0 0]
1.1 noro 1262:
1.2 ! noro 1263: [0 0 2 0 0]
1.1 noro 1264:
1.2 ! noro 1265: [0 0 0 2 1]
1.1 noro 1266:
1.2 ! noro 1267: [0 0 0 0 1]
1.1 noro 1268:
1269: ? idealtwoelt(nf,idy)
1.2 ! noro 1270: [5, [2, 2, 1, 2, 1]~]
1.1 noro 1271: ? idealtwoelt2(nf,idy,10)
1.2 ! noro 1272: [-2, -2, -1, -2, -1]~
1.1 noro 1273: ? idealval(nf,idp,vp)
1274: 7
1275: ? idmat(5)
1276:
1277: [1 0 0 0 0]
1278:
1279: [0 1 0 0 0]
1280:
1281: [0 0 1 0 0]
1282:
1283: [0 0 0 1 0]
1284:
1285: [0 0 0 0 1]
1286:
1287: ? if(3<2,print("bof"),print("ok"));
1288: ok
1289: ? imag(2+3*i)
1290: 3
1291: ? image([1,3,5;2,4,6;3,5,7])
1292:
1293: [1 3]
1294:
1295: [2 4]
1296:
1297: [3 5]
1298:
1299: ? image(pi*[1,3,5;2,4,6;3,5,7])
1300:
1301: [9.4247779607693797153879301498385086525 15.70796326794896619231321691639751
1302: 4420]
1303:
1304: [12.566370614359172953850573533118011536 18.84955592153875943077586029967701
1305: 7305]
1306:
1307: [15.707963267948966192313216916397514420 21.99114857512855266923850368295652
1308: 0189]
1309:
1310: ? incgam(2,1)
1311: 0.73575888234288464319104754032292173491
1312: ? incgam1(2,1)
1313: -0.26424111765711535680895245967678075578
1314: ? incgam2(2,1)
1315: 0.73575888234288464319104754032292173489
1316: ? incgam3(2,1)
1317: 0.26424111765711535680895245967707826508
1318: ? incgam4(4,1,6)
1319: 5.8860710587430771455283803225833738791
1320: ? indexrank([1,1,1;1,1,1;1,1,2])
1321: [[1, 3], [1, 3]]
1322: ? indsort([8,7,6,5])
1323: [4, 3, 2, 1]
1324: ? initell([0,0,0,-1,0])
1325: [0, 0, 0, -1, 0, 0, -2, 0, -1, 48, 0, 64, 1728, [1.0000000000000000000000000
1326: 000000000000, 0.E-38, -1.0000000000000000000000000000000000000]~, 2.62205755
1327: 42921198104648395898911194136, 2.6220575542921198104648395898911194136*I, -0
1328: .59907011736779610371996124614016193910, -1.79721035210338831115988373842048
1329: 58173*I, 6.8751858180203728274900957798105571979]
1330: ? initrect(1,700,700)
1331: ? nfz=initzeta(x^2-2);
1332: ? integ(sin(x),x)
1333: 1/2*x^2 - 1/24*x^4 + 1/720*x^6 - 1/40320*x^8 + 1/3628800*x^10 - 1/479001600*
1334: x^12 + 1/87178291200*x^14 - 1/20922789888000*x^16 + O(x^17)
1335: ? integ((-x^2-2*a*x+8*a)/(x^4-14*x^3+(2*a+49)*x^2-14*a*x+a^2),x)
1336: (x + a)/(x^2 - 7*x + a)
1337: ? intersect([1,2;3,4;5,6],[2,3;7,8;8,9])
1338:
1339: [-1]
1340:
1341: [-1]
1342:
1343: [-1]
1344:
1345: ? \precision=19
1346: realprecision = 19 significant digits
1347: ? intgen(x=0,pi,sin(x))
1348: 2.000000000000000017
1349: ? sqr(2*intgen(x=0,4,exp(-x^2)))
1350: 3.141592556720305685
1351: ? 4*intinf(x=1,10^20,1/(1+x^2))
1352: 3.141592653589793208
1353: ? intnum(x=-0.5,0.5,1/sqrt(1-x^2))
1354: 1.047197551196597747
1355: ? 2*intopen(x=0,100,sin(x)/x)
1356: 3.124450933778112629
1357: ? \precision=38
1358: realprecision = 38 significant digits
1359: ? inverseimage([1,1;2,3;5,7],[2,2,6]~)
1360: [4, -2]~
1361: ? isdiagonal([1,0,0;0,5,0;0,0,0])
1362: 1
1363: ? isfund(12345)
1364: 1
1.2 ! noro 1365: ? isideal(bnf[7],[5,2;0,1])
1.1 noro 1366: 1
1367: ? isincl(x^2+1,x^4+1)
1368: [-x^2, x^2]
1369: ? isinclfast(initalg(x^2+1),initalg(x^4+1))
1370: [-x^2, x^2]
1371: ? isirreducible(x^5+3*x^3+5*x^2+15)
1372: 0
1373: ? isisom(x^3+x^2-2*x-1,x^3+x^2-2*x-1)
1374: [x, -x^2 - x + 1, x^2 - 2]
1375: ? isisomfast(initalg(x^3-2),initalg(x^3-6*x^2-6*x-30))
1376: [-1/25*x^2 + 13/25*x - 2/5]
1377: ? isprime(12345678901234567)
1378: 0
1.2 ! noro 1379: ? isprincipal(bnf,[5,2;0,1])
1.1 noro 1380: [1]~
1.2 ! noro 1381: ? isprincipalgen(bnf,[5,2;0,1])
! 1382: [[1]~, [7/3, 1/3]~, 155]
1.1 noro 1383: ? isprincipalraygen(bnr,primedec(bnf,7)[1])
1.2 ! noro 1384: [[9]~, [112595/19683, 13958/19683]~, 192]
1.1 noro 1385: ? ispsp(73!+1)
1386: 1
1387: ? isqrt(10!^2+1)
1388: 3628800
1389: ? isset([-3,5,7,7])
1390: 0
1391: ? issqfree(123456789876543219)
1392: 0
1393: ? issquare(12345678987654321)
1394: 1
1395: ? isunit(bnf,mod(3405*x-27466,x^2-x-57))
1396: [-4, mod(1, 2)]~
1397: ? jacobi(hilbert(6))
1398: [[1.6188998589243390969705881471257800712, 0.2423608705752095521357284158507
1399: 0114077, 0.000012570757122625194922982397996498755027, 0.0000001082799484565
1400: 5497685388772372251711485, 0.016321521319875822124345079564191505890, 0.0006
1401: 1574835418265769764919938428527140264]~, [0.74871921887909485900280109200517
1402: 845109, -0.61454482829258676899320019644273870645, 0.01114432093072471053067
1403: 8340374220998541, -0.0012481940840821751169398163046387834473, 0.24032536934
1404: 252330399154228873240534568, -0.062226588150197681775152126611810492910; 0.4
1405: 4071750324351206127160083580231701801, 0.21108248167867048675227675845247769
1406: 095, -0.17973275724076003758776897803740640964, 0.03560664294428763526612284
1407: 8131812048466, -0.69765137527737012296208335046678265583, 0.4908392097109243
1408: 6297498316169060044997; 0.32069686982225190106359024326699463106, 0.36589360
1409: 730302614149086554211117169622, 0.60421220675295973004426567844103062241, -0
1410: .24067907958842295837736719558855679285, -0.23138937333290388042251363554209
1411: 048309, -0.53547692162107486593474491750949545456; 0.25431138634047419251788
1412: 312792590944672, 0.39470677609501756783094636145991581708, -0.44357471627623
1413: 954554460416705180105301, 0.62546038654922724457753441039459331059, 0.132863
1414: 15850933553530333839628101576050, -0.41703769221897886840494514780771076439;
1415: 0.21153084007896524664213667673977991959, 0.3881904338738864286311144882599
1416: 2418973, -0.44153664101228966222143649752977203423, -0.689807199293836684198
1417: 01738006926829419, 0.36271492146487147525299457604461742111, 0.0470340189331
1418: 15649705614518466541243873; 0.18144297664876947372217005457727093715, 0.3706
1419: 9590776736280861775501084807394603, 0.45911481681642960284551392793050866602
1420: , 0.27160545336631286930015536176213647001, 0.502762866757515384892605663686
1421: 47786272, 0.54068156310385293880022293448123782121]]
1422: ? jbesselh(1,1)
1423: 0.24029783912342701089584304474193368045
1424: ? jell(i)
1425: 1728.0000000000000000000000000000000000 + 0.E-45*I
1426: ? kbessel(1+i,1)
1427: 0.32545977186584141085464640324923711863 + 0.2894280370259921276345671592415
1428: 2302704*I
1429: ? kbessel2(1+i,1)
1430: 0.32545977186584141085464640324923711863 + 0.2894280370259921276345671592415
1431: 2302704*I
1432: ? x
1433: x
1434: ? y
1435: x
1436: ? ker(matrix(4,4,x,y,x/y))
1437:
1438: [-1/2 -1/3 -1/4]
1439:
1440: [1 0 0]
1441:
1442: [0 1 0]
1443:
1444: [0 0 1]
1445:
1446: ? ker(matrix(4,4,x,y,sin(x+y)))
1447:
1448: [1.0000000000000000000000000000000000000 1.080604611736279434801873214885953
1449: 2074]
1450:
1451: [-1.0806046117362794348018732148859532074 -0.1677063269057152260048635409984
1452: 7562046]
1453:
1454: [1 0]
1455:
1456: [0 1]
1457:
1458: ? keri(matrix(4,4,x,y,x+y))
1459:
1460: [1 2]
1461:
1462: [-2 -3]
1463:
1464: [1 0]
1465:
1466: [0 1]
1467:
1468: ? kerint(matrix(4,4,x,y,x*y))
1469:
1470: [-1 -1 -1]
1471:
1472: [-1 0 1]
1473:
1474: [1 -1 1]
1475:
1476: [0 1 -1]
1477:
1478: ? kerint1(matrix(4,4,x,y,x*y))
1479:
1480: [-1 -1 -1]
1481:
1482: [-1 0 1]
1483:
1484: [1 -1 1]
1485:
1486: [0 1 -1]
1487:
1488: ? kerint2(matrix(4,6,x,y,2520/(x+y)))
1.2 ! noro 1489: *** this function has been suppressed.
1.1 noro 1490: ? f(u)=u+1;
1491: ? print(f(5));kill(f);
1492: 6
1493: ? f=12
1494: 12
1495: ? killrect(1)
1496: ? kro(5,7)
1497: -1
1498: ? kro(3,18)
1499: 0
1500: ? laplace(x*exp(x*y)/(exp(x)-1))
1501: 1 - 1/2*x + 13/6*x^2 - 3*x^3 + 419/30*x^4 - 30*x^5 + 6259/42*x^6 - 420*x^7 +
1502: 22133/10*x^8 - 7560*x^9 + 2775767/66*x^10 - 166320*x^11 + 2655339269/2730*x
1503: ^12 - 4324320*x^13 + 264873251/10*x^14 + O(x^15)
1504: ? lcm(15,-21)
1505: 105
1506: ? length(divisors(1000))
1507: 16
1508: ? legendre(10)
1509: 46189/256*x^10 - 109395/256*x^8 + 45045/128*x^6 - 15015/128*x^4 + 3465/256*x
1510: ^2 - 63/256
1511: ? lex([1,3],[1,3,5])
1512: -1
1513: ? lexsort([[1,5],[2,4],[1,5,1],[1,4,2]])
1514: [[1, 4, 2], [1, 5], [1, 5, 1], [2, 4]]
1515: ? lift(chinese(mod(7,15),mod(4,21)))
1516: 67
1517: ? lindep([(1-3*sqrt(2))/(3-2*sqrt(3)),1,sqrt(2),sqrt(3),sqrt(6)])
1518: [-3, -3, 9, -2, 6]
1519: ? lindep2([(1-3*sqrt(2))/(3-2*sqrt(3)),1,sqrt(2),sqrt(3),sqrt(6)],14)
1520: [-3, -3, 9, -2, 6]
1521: ? move(0,0,900);line(0,900,0)
1522: ? lines(0,vector(5,k,50*k),vector(5,k,10*k*k))
1523: ? m=1/hilbert(7)
1524:
1525: [49 -1176 8820 -29400 48510 -38808 12012]
1526:
1527: [-1176 37632 -317520 1128960 -1940400 1596672 -504504]
1528:
1529: [8820 -317520 2857680 -10584000 18711000 -15717240 5045040]
1530:
1531: [-29400 1128960 -10584000 40320000 -72765000 62092800 -20180160]
1532:
1533: [48510 -1940400 18711000 -72765000 133402500 -115259760 37837800]
1534:
1535: [-38808 1596672 -15717240 62092800 -115259760 100590336 -33297264]
1536:
1537: [12012 -504504 5045040 -20180160 37837800 -33297264 11099088]
1538:
1539: ? mp=concat(m,idmat(7))
1540:
1541: [49 -1176 8820 -29400 48510 -38808 12012 1 0 0 0 0 0 0]
1542:
1543: [-1176 37632 -317520 1128960 -1940400 1596672 -504504 0 1 0 0 0 0 0]
1544:
1545: [8820 -317520 2857680 -10584000 18711000 -15717240 5045040 0 0 1 0 0 0 0]
1546:
1547: [-29400 1128960 -10584000 40320000 -72765000 62092800 -20180160 0 0 0 1 0 0
1548: 0]
1549:
1550: [48510 -1940400 18711000 -72765000 133402500 -115259760 37837800 0 0 0 0 1 0
1551: 0]
1552:
1553: [-38808 1596672 -15717240 62092800 -115259760 100590336 -33297264 0 0 0 0 0
1554: 1 0]
1555:
1556: [12012 -504504 5045040 -20180160 37837800 -33297264 11099088 0 0 0 0 0 0 1]
1557:
1558: ? lll(m)
1559:
1560: [-420 -420 840 630 -1092 757 2982]
1561:
1562: [-210 -280 630 504 -876 700 2415]
1563:
1564: [-140 -210 504 420 -749 641 2050]
1565:
1566: [-105 -168 420 360 -658 589 1785]
1567:
1568: [-84 -140 360 315 -588 544 1582]
1569:
1570: [-70 -120 315 280 -532 505 1421]
1571:
1572: [-60 -105 280 252 -486 471 1290]
1573:
1574: ? lll1(m)
1.2 ! noro 1575: *** this function has been suppressed.
1.1 noro 1576: ? lllgram(m)
1577:
1578: [1 1 27 -27 69 0 141]
1579:
1580: [0 1 4 -22 34 -24 49]
1581:
1582: [0 1 3 -21 18 -24 23]
1583:
1584: [0 1 3 -20 10 -19 13]
1585:
1586: [0 1 3 -19 6 -14 8]
1587:
1588: [0 1 3 -18 4 -10 5]
1589:
1590: [0 1 3 -17 3 -7 3]
1591:
1592: ? lllgram1(m)
1.2 ! noro 1593: *** this function has been suppressed.
1.1 noro 1594: ? lllgramint(m)
1595:
1596: [1 1 27 -27 69 0 141]
1597:
1598: [0 1 4 -23 34 -24 91]
1599:
1600: [0 1 3 -22 18 -24 65]
1601:
1602: [0 1 3 -21 10 -19 49]
1603:
1604: [0 1 3 -20 6 -14 38]
1605:
1606: [0 1 3 -19 4 -10 30]
1607:
1608: [0 1 3 -18 3 -7 24]
1609:
1610: ? lllgramkerim(mp~*mp)
1611: [[-420, -420, 840, 630, 2982, -1092, -83; -210, -280, 630, 504, 2415, -876,
1612: 70; -140, -210, 504, 420, 2050, -749, 137; -105, -168, 420, 360, 1785, -658,
1613: 169; -84, -140, 360, 315, 1582, -588, 184; -70, -120, 315, 280, 1421, -532,
1614: 190; -60, -105, 280, 252, 1290, -486, 191; 420, 0, 0, 0, -210, 168, 35; 0,
1615: 840, 0, 0, 0, 0, 336; 0, 0, -2520, 0, 0, 0, 1260; 0, 0, 0, -2520, 0, 0, -840
1616: ; 0, 0, 0, 0, -13860, 0, 6930; 0, 0, 0, 0, 0, 5544, 0; 0, 0, 0, 0, 0, 0, -12
1617: 012], [0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0,
1618: 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0
1619: ; 1, 0, 0, 0, 0, 0, 0; 0, 1, 0, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0, 0; 0, 0, 0, 1,
1620: 0, 0, 0; 0, 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 0, 1]]
1621: ? lllint(m)
1622:
1623: [-420 -420 840 630 -1092 -83 2982]
1624:
1625: [-210 -280 630 504 -876 70 2415]
1626:
1627: [-140 -210 504 420 -749 137 2050]
1628:
1629: [-105 -168 420 360 -658 169 1785]
1630:
1631: [-84 -140 360 315 -588 184 1582]
1632:
1633: [-70 -120 315 280 -532 190 1421]
1634:
1635: [-60 -105 280 252 -486 191 1290]
1636:
1637: ? lllintpartial(m)
1638:
1639: [-420 -420 -630 840 1092 2982 -83]
1640:
1641: [-210 -280 -504 630 876 2415 70]
1642:
1643: [-140 -210 -420 504 749 2050 137]
1644:
1645: [-105 -168 -360 420 658 1785 169]
1646:
1647: [-84 -140 -315 360 588 1582 184]
1648:
1649: [-70 -120 -280 315 532 1421 190]
1650:
1651: [-60 -105 -252 280 486 1290 191]
1652:
1653: ? lllkerim(mp)
1654: [[-420, -420, 840, 630, 2982, -1092, -83; -210, -280, 630, 504, 2415, -876,
1655: 70; -140, -210, 504, 420, 2050, -749, 137; -105, -168, 420, 360, 1785, -658,
1656: 169; -84, -140, 360, 315, 1582, -588, 184; -70, -120, 315, 280, 1421, -532,
1657: 190; -60, -105, 280, 252, 1290, -486, 191; 420, 0, 0, 0, -210, 168, 35; 0,
1658: 840, 0, 0, 0, 0, 336; 0, 0, -2520, 0, 0, 0, 1260; 0, 0, 0, -2520, 0, 0, -840
1659: ; 0, 0, 0, 0, -13860, 0, 6930; 0, 0, 0, 0, 0, 5544, 0; 0, 0, 0, 0, 0, 0, -12
1660: 012], [0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0,
1661: 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0; 0, 0, 0, 0, 0, 0, 0
1662: ; 1, 0, 0, 0, 0, 0, 0; 0, 1, 0, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0, 0; 0, 0, 0, 1,
1663: 0, 0, 0; 0, 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 0, 1]]
1664: ? lllrat(m)
1.2 ! noro 1665: *** this function has been suppressed.
1.1 noro 1666: ? \precision=96
1667: realprecision = 96 significant digits
1668: ? ln(2)
1669: 0.69314718055994530941723212145817656807550013436025525412068000949339362196
1670: 9694715605863326996418
1671: ? lngamma(10^50*i)
1672: -157079632679489661923132169163975144209858469968811.93673753887608474948977
1673: 0941153418951907406847 - 2.5258126069288717421377720813802613884088088474975
1674: 8842685248040385012601916745265645208759475328*I
1675: ? \precision=2000
1676: realprecision = 2003 significant digits (2000 digits displayed)
1677: ? log(2)
1678: 0.69314718055994530941723212145817656807550013436025525412068000949339362196
1679: 9694715605863326996418687542001481020570685733685520235758130557032670751635
1680: 0759619307275708283714351903070386238916734711233501153644979552391204751726
1681: 8157493206515552473413952588295045300709532636664265410423915781495204374043
1682: 0385500801944170641671518644712839968171784546957026271631064546150257207402
1683: 4816377733896385506952606683411372738737229289564935470257626520988596932019
1684: 6505855476470330679365443254763274495125040606943814710468994650622016772042
1685: 4524529612687946546193165174681392672504103802546259656869144192871608293803
1686: 1727143677826548775664850856740776484514644399404614226031930967354025744460
1687: 7030809608504748663852313818167675143866747664789088143714198549423151997354
1688: 8803751658612753529166100071053558249879414729509293113897155998205654392871
1689: 7000721808576102523688921324497138932037843935308877482597017155910708823683
1690: 6275898425891853530243634214367061189236789192372314672321720534016492568727
1691: 4778234453534764811494186423867767744060695626573796008670762571991847340226
1692: 5146283790488306203306114463007371948900274364396500258093651944304119115060
1693: 8094879306786515887090060520346842973619384128965255653968602219412292420757
1694: 4321757489097706752687115817051137009158942665478595964890653058460258668382
1695: 9400228330053820740056770530467870018416240441883323279838634900156312188956
1696: 0650553151272199398332030751408426091479001265168243443893572472788205486271
1697: 5527418772430024897945401961872339808608316648114909306675193393128904316413
1698: 7068139777649817697486890388778999129650361927071088926410523092478391737350
1699: 1229842420499568935992206602204654941510613918788574424557751020683703086661
1700: 9480896412186807790208181588580001688115973056186676199187395200766719214592
1701: 2367206025395954365416553112951759899400560003665135675690512459268257439464
1702: 8316833262490180382424082423145230614096380570070255138770268178516306902551
1703: 3703234053802145019015374029509942262995779647427138157363801729873940704242
1704: 17997226696297993931270693
1705: ? logagm(2)
1706: 0.69314718055994530941723212145817656807550013436025525412068000949339362196
1707: 9694715605863326996418687542001481020570685733685520235758130557032670751635
1708: 0759619307275708283714351903070386238916734711233501153644979552391204751726
1709: 8157493206515552473413952588295045300709532636664265410423915781495204374043
1710: 0385500801944170641671518644712839968171784546957026271631064546150257207402
1711: 4816377733896385506952606683411372738737229289564935470257626520988596932019
1712: 6505855476470330679365443254763274495125040606943814710468994650622016772042
1713: 4524529612687946546193165174681392672504103802546259656869144192871608293803
1714: 1727143677826548775664850856740776484514644399404614226031930967354025744460
1715: 7030809608504748663852313818167675143866747664789088143714198549423151997354
1716: 8803751658612753529166100071053558249879414729509293113897155998205654392871
1717: 7000721808576102523688921324497138932037843935308877482597017155910708823683
1718: 6275898425891853530243634214367061189236789192372314672321720534016492568727
1719: 4778234453534764811494186423867767744060695626573796008670762571991847340226
1720: 5146283790488306203306114463007371948900274364396500258093651944304119115060
1721: 8094879306786515887090060520346842973619384128965255653968602219412292420757
1722: 4321757489097706752687115817051137009158942665478595964890653058460258668382
1723: 9400228330053820740056770530467870018416240441883323279838634900156312188956
1724: 0650553151272199398332030751408426091479001265168243443893572472788205486271
1725: 5527418772430024897945401961872339808608316648114909306675193393128904316413
1726: 7068139777649817697486890388778999129650361927071088926410523092478391737350
1727: 1229842420499568935992206602204654941510613918788574424557751020683703086661
1728: 9480896412186807790208181588580001688115973056186676199187395200766719214592
1729: 2367206025395954365416553112951759899400560003665135675690512459268257439464
1730: 8316833262490180382424082423145230614096380570070255138770268178516306902551
1731: 3703234053802145019015374029509942262995779647427138157363801729873940704242
1732: 17997226696297993931270693
1733: ? \precision=19
1734: realprecision = 19 significant digits
1735: ? bcurve=initell([0,0,0,-3,0])
1736: [0, 0, 0, -3, 0, 0, -6, 0, -9, 144, 0, 1728, 1728, [1.732050807568877293, 0.
1737: E-19, -1.732050807568877293]~, 1.992332899583490707, 1.992332899583490708*I,
1738: -0.7884206134041560682, -2.365261840212468204*I, 3.969390382762759668]
1739: ? localred(bcurve,2)
1740: [6, 2, [1, 1, 1, 0], 1]
1741: ? ccurve=initell([0,0,-1,-1,0])
1742: [0, 0, -1, -1, 0, 0, -2, 1, -1, 48, -216, 37, 110592/37, [0.8375654352833230
1743: 353, 0.2695944364054445582, -1.107159871688767593]~, 2.993458646231959630, 2
1744: .451389381986790061*I, -0.4713192779568114757, -1.435456518668684318*I, 7.33
1745: 8132740789576742]
1746: ? l=lseriesell(ccurve,2,-37,1)
1747: 0.3815754082607112111
1748: ? lseriesell(ccurve,2,-37,1.2)-l
1749: -1.08420217 E-19
1750: ? sbnf=smallbuchinit(x^3-x^2-14*x-1)
1.2 ! noro 1751: [x^3 - x^2 - 14*x - 1, 3, 10889, [1, x, x^2 - x - 9], [-3.233732695981516672
! 1752: , -0.07182350902743636344, 4.305556205008953036], [10889, 5698, 8994; 0, 1,
! 1753: 0; 0, 0, 1], mat(2), mat([1, 1, 0, 1, 1, 0, 1, 1]), [9, 15, 16, 17, 39, 10,
! 1754: 33, 57, 69], [2, [-1, 0, 0]~], [[0, 1, 0]~, [5, 3, 1]~], [-4, -1, 2, 3, 10,
! 1755: 3, 1, 7, 2; 1, 1, 1, 1, 5, 0, 1, 2, 1; 0, 0, 0, 0, 1, 0, 0, 0, -1]]
1.1 noro 1756: ? makebigbnf(sbnf)
1.2 ! noro 1757: [mat(2), mat([1, 1, 0, 1, 1, 0, 1, 1]), [1.173637103435061715 + 3.1415926535
! 1758: 89793238*I, -4.562279014988837952 + 3.141592653589793238*I; -2.6335434327389
1.1 noro 1759: 76049 + 3.141592653589793238*I, 1.420330600779487357 + 3.141592653589793238*
1760: I; 1.459906329303914334, 3.141948414209350543], [1.246346989334819161 + 3.14
1.2 ! noro 1761: 1592653589793238*I, 0.5404006376129469727 + 3.141592653589793238*I, -0.69263
! 1762: 91142471042844 + 3.141592653589793238*I, -1.990056445584799713 + 3.141592653
! 1763: 589793238*I, -0.8305625946607188643 + 3.141592653589793238*I, 0.E-57, 0.0043
! 1764: 75616572659815433 + 3.141592653589793238*I, -1.977791147836553953, 0.3677262
! 1765: 014027817708 + 3.141592653589793238*I; 0.6716827432867392938 + 3.14159265358
! 1766: 9793238*I, -0.8333219883742404170 + 3.141592653589793238*I, -0.2461086674077
! 1767: 943076, 0.5379005671092853269, -1.552661549868775853, 0.E-57, -0.87383180430
! 1768: 71131263, 0.5774919091398324092, 0.9729063188316092380; -1.91802973262155845
! 1769: 5, 0.2929213507612934444, 0.9387477816548985923, 1.452155878475514386, 2.383
! 1770: 224144529494717, 0.E-57, 0.8694561877344533111, 1.400299238696721544, -1.340
! 1771: 632520234391008], [[3, [-1, 1, 0]~, 1, 1, [1, 1, 1]~], [5, [-1, 1, 0]~, 1, 1
! 1772: , [0, 1, 1]~], [5, [2, 1, 0]~, 1, 1, [1, -2, 1]~], [5, [3, 1, 0]~, 1, 1, [2,
! 1773: 2, 1]~], [13, [19, 1, 0]~, 1, 1, [-2, -6, 1]~], [3, [10, 1, 1]~, 1, 2, [-1,
! 1774: 1, 0]~], [11, [1, 1, 0]~, 1, 1, [-3, -1, 1]~], [19, [-6, 1, 0]~, 1, 1, [6,
! 1775: 6, 1]~], [23, [-10, 1, 0]~, 1, 1, [-7, 10, 1]~]]~, 0, [x^3 - x^2 - 14*x - 1,
! 1776: [3, 0], 10889, 1, [[1, -3.233732695981516672, 4.690759845041404811; 1, -0.0
! 1777: 7182350902743636344, -8.923017874523549402; 1, 4.305556205008953036, 5.23225
! 1778: 8029482144592], [1, -3.233732695981516672, 4.690759845041404811; 1, -0.07182
! 1779: 350902743636344, -8.923017874523549402; 1, 4.305556205008953036, 5.232258029
! 1780: 482144592], 0, [3, 1, 1; 1, 29, 8; 1, 8, 129], [10889, 5698, 8994; 0, 1, 0;
! 1781: 0, 0, 1], [3677, -121, -21; -121, 386, -23; -21, -23, 86], [10889, [1899, 51
! 1782: 91, 1]~]], [-3.233732695981516672, -0.07182350902743636344, 4.30555620500895
! 1783: 3036], [1, x, x^2 - x - 9], [1, 0, 9; 0, 1, 1; 0, 0, 1], [1, 0, 0, 0, 9, 1,
! 1784: 0, 1, 44; 0, 1, 0, 1, 1, 5, 0, 5, 1; 0, 0, 1, 0, 1, 0, 1, 0, -4]], [[2, [2],
! 1785: [[3, 2, 0; 0, 1, 0; 0, 0, 1]]], 10.34800724602768011, 1.000000000000000000,
! 1786: [2, -1], [x, x^2 + 2*x - 4], 1000], [mat(1), [[0.E-57, 0.E-57, 0.E-57]], [[
! 1787: 1.246346989334819161 + 3.141592653589793238*I, 0.6716827432867392938 + 3.141
! 1788: 592653589793238*I, -1.918029732621558455]]], [-4, -1, 2, 3, 10, 3, 1, 7, 2;
! 1789: 1, 1, 1, 1, 5, 0, 1, 2, 1; 0, 0, 0, 0, 1, 0, 0, 0, -1]]
1.1 noro 1790: ? concat(mat(vector(4,x,x)~),vector(4,x,10+x)~)
1791:
1792: [1 11]
1793:
1794: [2 12]
1795:
1796: [3 13]
1797:
1798: [4 14]
1799:
1800: ? matextract(matrix(15,15,x,y,x+y),vector(5,x,3*x),vector(3,y,3*y))
1801:
1802: [6 9 12]
1803:
1804: [9 12 15]
1805:
1806: [12 15 18]
1807:
1808: [15 18 21]
1809:
1810: [18 21 24]
1811:
1812: ? ma=mathell(mcurve,mpoints)
1813:
1814: [1.172183098700697010 0.4476973883408951692]
1815:
1816: [0.4476973883408951692 1.755026016172950713]
1817:
1818: ? gauss(ma,mhbi)
1819: [-1.000000000000000000, 1.000000000000000000]~
1820: ? (1.*hilbert(7))^(-1)
1821:
1822: [48.99999999999354616 -1175.999999999759026 8819.999999997789586 -29399.9999
1823: 9999171836 48509.99999998526254 -38807.99999998756766 12011.99999999599856]
1824:
1825: [-1175.999999999756499 37631.99999999093860 -317519.9999999170483 1128959.99
1826: 9999689868 -1940399.999999448886 1596671.999999535762 -504503.9999998507690]
1827:
1828: [8819.999999997745604 -317519.9999999163090 2857679.999999235184 -10583999.9
1829: 9999714478 18710999.99999493212 -15717239.99999573533 5045039.999998630382]
1830:
1831: [-29399.99999999149442 1128959.999999684822 -10583999.99999712372 40319999.9
1832: 9998927448 -72764999.99998098063 62092799.99998400783 -20180159.99999486766]
1833:
1834: [48509.99999998476962 -1940399.999999436456 18710999.99999486299 -72764999.9
1835: 9998086196 133402499.9999660890 -115259759.9999715052 37837799.99999086044]
1836:
1837: [-38807.99999998708779 1596671.999999522805 -15717239.99999565420 62092799.9
1838: 9998382209 -115259759.9999713525 100590335.9999759413 -33297263.99999228701]
1839:
1840: [12011.99999999582671 -504503.9999998459239 5045039.999998597949 -20180159.9
1841: 9999478405 37837799.99999076882 -33297263.99999225112 11099087.99999751679]
1842:
1843: ? matsize([1,2;3,4;5,6])
1844: [3, 2]
1845: ? matrix(5,5,x,y,gcd(x,y))
1846:
1847: [1 1 1 1 1]
1848:
1849: [1 2 1 2 1]
1850:
1851: [1 1 3 1 1]
1852:
1853: [1 2 1 4 1]
1854:
1855: [1 1 1 1 5]
1856:
1857: ? matrixqz([1,3;3,5;5,7],0)
1858:
1859: [1 1]
1860:
1861: [3 2]
1862:
1863: [5 3]
1864:
1865: ? matrixqz2([1/3,1/4,1/6;1/2,1/4,-1/4;1/3,1,0])
1866:
1867: [19 12 2]
1868:
1869: [0 1 0]
1870:
1871: [0 0 1]
1872:
1873: ? matrixqz3([1,3;3,5;5,7])
1874:
1875: [2 -1]
1876:
1877: [1 0]
1878:
1879: [0 1]
1880:
1881: ? max(2,3)
1882: 3
1883: ? min(2,3)
1884: 2
1885: ? minim([2,1;1,2],4,6)
1886: [6, 2, [0, -1, 1; 1, 1, 0]]
1887: ? mod(-12,7)
1888: mod(2, 7)
1889: ? modp(-12,7)
1890: mod(2, 7)
1891: ? mod(10873,49649)^-1
1892: *** impossible inverse modulo: mod(131, 49649).
1893: ? modreverse(mod(x^2+1,x^3-x-1))
1894: mod(x^2 - 3*x + 2, x^3 - 5*x^2 + 8*x - 5)
1895: ? move(0,243,583);cursor(0)
1896: ? mu(3*5*7*11*13)
1897: -1
1898: ? newtonpoly(x^4+3*x^3+27*x^2+9*x+81,3)
1899: [2, 2/3, 2/3, 2/3]
1900: ? nextprime(100000000000000000000000)
1901: 100000000000000000000117
1902: ? setrand(1);a=matrix(3,5,j,k,vvector(5,l,random()\10^8))
1903:
1904: [[10, 7, 8, 7, 18]~ [17, 0, 9, 20, 10]~ [5, 4, 7, 18, 20]~ [0, 16, 4, 2, 0]~
1905: [17, 19, 17, 1, 14]~]
1906:
1907: [[17, 16, 6, 3, 6]~ [17, 13, 9, 19, 6]~ [1, 14, 12, 20, 8]~ [6, 1, 8, 17, 21
1908: ]~ [18, 17, 9, 10, 13]~]
1909:
1910: [[4, 13, 3, 17, 14]~ [14, 16, 11, 5, 4]~ [9, 11, 13, 7, 15]~ [19, 21, 2, 4,
1911: 5]~ [14, 16, 6, 20, 14]~]
1912:
1913: ? aid=[idx,idy,idz,idmat(5),idx]
1.2 ! noro 1914: [[3, 2, 1, 0, 1; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1]
! 1915: , [5, 0, 0, 0, 2; 0, 5, 0, 0, 2; 0, 0, 5, 0, 1; 0, 0, 0, 5, 2; 0, 0, 0, 0, 1
! 1916: ], [15, 10, 5, 0, 12; 0, 5, 0, 0, 2; 0, 0, 5, 0, 1; 0, 0, 0, 5, 2; 0, 0, 0,
! 1917: 0, 1], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0,
! 1918: 0, 1], [3, 2, 1, 0, 1; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0
! 1919: , 0, 1]]
1.1 noro 1920: ? bb=algtobasis(nf,mod(x^3+x,nfpol))
1.2 ! noro 1921: [1, 1, 4, 1, 3]~
1.1 noro 1922: ? da=nfdetint(nf,[a,aid])
1923:
1.2 ! noro 1924: [90 70 35 0 65]
1.1 noro 1925:
1926: [0 5 0 0 0]
1927:
1.2 ! noro 1928: [0 0 5 0 0]
1.1 noro 1929:
1.2 ! noro 1930: [0 0 0 5 0]
1.1 noro 1931:
1932: [0 0 0 0 5]
1933:
1934: ? nfdiv(nf,ba,bb)
1.2 ! noro 1935: [584/373, 66/373, -32/373, -105/373, 120/373]~
1.1 noro 1936: ? nfdiveuc(nf,ba,bb)
1.2 ! noro 1937: [2, 0, 0, 0, 0]~
1.1 noro 1938: ? nfdivres(nf,ba,bb)
1.2 ! noro 1939: [[2, 0, 0, 0, 0]~, [4, -1, -5, -1, -3]~]
1.1 noro 1940: ? nfhermite(nf,[a,aid])
1.2 ! noro 1941: [[[1, 0, 0, 0, 0]~, [-2, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~; [0, 0, 0, 0, 0]~, [
! 1942: 1, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~; [0, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~, [1, 0
! 1943: , 0, 0, 0]~], [[10, 4, 5, 6, 7; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0;
! 1944: 0, 0, 0, 0, 1], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0
! 1945: ; 0, 0, 0, 0, 1], [3, 2, 1, 0, 1; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1,
! 1946: 0; 0, 0, 0, 0, 1]]]
1.1 noro 1947: ? nfhermitemod(nf,[a,aid],da)
1.2 ! noro 1948: [[[1, 0, 0, 0, 0]~, [-2, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~; [0, 0, 0, 0, 0]~, [
! 1949: 1, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~; [0, 0, 0, 0, 0]~, [0, 0, 0, 0, 0]~, [1, 0
! 1950: , 0, 0, 0]~], [[10, 4, 5, 6, 7; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0;
! 1951: 0, 0, 0, 0, 1], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0
! 1952: ; 0, 0, 0, 0, 1], [3, 2, 1, 0, 1; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1,
! 1953: 0; 0, 0, 0, 0, 1]]]
1.1 noro 1954: ? nfmod(nf,ba,bb)
1.2 ! noro 1955: [4, -1, -5, -1, -3]~
1.1 noro 1956: ? nfmul(nf,ba,bb)
1.2 ! noro 1957: [50, -15, -35, 60, 15]~
1.1 noro 1958: ? nfpow(nf,bb,5)
1.2 ! noro 1959: [-291920, 136855, 230560, -178520, 74190]~
1.1 noro 1960: ? nfreduce(nf,ba,idx)
1961: [1, 0, 0, 0, 0]~
1962: ? setrand(1);as=matrix(3,3,j,k,vvector(5,l,random()\10^8))
1963:
1964: [[10, 7, 8, 7, 18]~ [17, 0, 9, 20, 10]~ [5, 4, 7, 18, 20]~]
1965:
1966: [[17, 16, 6, 3, 6]~ [17, 13, 9, 19, 6]~ [1, 14, 12, 20, 8]~]
1967:
1968: [[4, 13, 3, 17, 14]~ [14, 16, 11, 5, 4]~ [9, 11, 13, 7, 15]~]
1969:
1970: ? vaid=[idx,idy,idmat(5)]
1.2 ! noro 1971: [[3, 2, 1, 0, 1; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1]
! 1972: , [5, 0, 0, 0, 2; 0, 5, 0, 0, 2; 0, 0, 5, 0, 1; 0, 0, 0, 5, 2; 0, 0, 0, 0, 1
1.1 noro 1973: ], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0,
1974: 1]]
1975: ? haid=[idmat(5),idmat(5),idmat(5)]
1976: [[1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1]
1977: , [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1
1978: ], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0,
1979: 1]]
1980: ? nfsmith(nf,[as,haid,vaid])
1.2 ! noro 1981: [[2562748315629757085585610, 436545976069778274371140, 123799938628701108220
! 1982: 1405, 2356446991473627724963350, 801407102592194537169612; 0, 5, 0, 0, 2; 0,
! 1983: 0, 5, 0, 1; 0, 0, 0, 5, 2; 0, 0, 0, 0, 1], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0; 0
! 1984: , 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1], [1, 0, 0, 0, 0; 0, 1, 0, 0, 0;
! 1985: 0, 0, 1, 0, 0; 0, 0, 0, 1, 0; 0, 0, 0, 0, 1]]
1.1 noro 1986: ? nfval(nf,ba,vp)
1987: 0
1988: ? norm(1+i)
1989: 2
1990: ? norm(mod(x+5,x^3+x+1))
1991: 129
1992: ? norml2(vector(10,x,x))
1993: 385
1994: ? nucomp(qfi(2,1,9),qfi(4,3,5),3)
1995: qfi(2, -1, 9)
1996: ? form=qfi(2,1,9);nucomp(form,form,3)
1997: qfi(4, -3, 5)
1998: ? numdiv(2^99*3^49)
1999: 5000
2000: ? numer((x+1)/(x-1))
2001: x + 1
2002: ? nupow(form,111)
2003: qfi(2, -1, 9)
2004: ? 1/(1+x)+o(x^20)
2005: 1 - x + x^2 - x^3 + x^4 - x^5 + x^6 - x^7 + x^8 - x^9 + x^10 - x^11 + x^12 -
2006: x^13 + x^14 - x^15 + x^16 - x^17 + x^18 - x^19 + O(x^20)
2007: ? omega(100!)
2008: 25
2009: ? ordell(acurve,1)
2010: [8, 3]
2011: ? order(mod(33,2^16+1))
2012: 2048
2013: ? tcurve=initell([1,0,1,-19,26]);
2014: ? orderell(tcurve,[1,2])
2015: 6
2016: ? ordred(x^3-12*x+45*x-1)
2017: [x - 1, x^3 - 363*x - 2663, x^3 + 33*x - 1]
2018: ? padicprec(padicno,127)
2019: 5
2020: ? pascal(8)
2021:
2022: [1 0 0 0 0 0 0 0 0]
2023:
2024: [1 1 0 0 0 0 0 0 0]
2025:
2026: [1 2 1 0 0 0 0 0 0]
2027:
2028: [1 3 3 1 0 0 0 0 0]
2029:
2030: [1 4 6 4 1 0 0 0 0]
2031:
2032: [1 5 10 10 5 1 0 0 0]
2033:
2034: [1 6 15 20 15 6 1 0 0]
2035:
2036: [1 7 21 35 35 21 7 1 0]
2037:
2038: [1 8 28 56 70 56 28 8 1]
2039:
2040: ? perf([2,0,1;0,2,1;1,1,2])
2041: 6
2042: ? permutation(7,1035)
2043: [4, 7, 1, 6, 3, 5, 2]
2044: ? permutation2num([4,7,1,6,3,5,2])
2045: 1035
2046: ? pf(-44,3)
2047: qfi(3, 2, 4)
2048: ? phi(257^2)
2049: 65792
2050: ? pi
2051: 3.141592653589793238
2052: ? plot(x=-5,5,sin(x))
2053:
2054: 0.9995545 x""x_''''''''''''''''''''''''''''''''''_x""x'''''''''''''''''''|
2055: | x _ "_ |
2056: | x _ _ |
2057: | x _ |
2058: | _ " |
2059: | " x |
2060: | x _ |
2061: | " |
2062: | " x _ |
2063: | _ |
2064: | " x |
2065: ````````````x``````````````````_````````````````````````````````
2066: | " |
2067: | " x _ |
2068: | _ |
2069: | " x |
2070: | x _ |
2071: | _ " |
2072: | " x |
2073: | " " x |
2074: | "_ " x |
2075: -0.999555 |...................x__x".................................."x__x
2076: -5 5
2077: ? pnqn([2,6,10,14,18,22,26])
2078:
2079: [19318376 741721]
2080:
2081: [8927353 342762]
2082:
2083: ? pnqn([1,1,1,1,1,1,1,1;1,1,1,1,1,1,1,1])
2084:
2085: [34 21]
2086:
2087: [21 13]
2088:
2089: ? point(0,225,334)
2090: ? points(0,vector(10,k,10*k),vector(10,k,5*k*k))
2091: ? pointell(acurve,zell(acurve,apoint))
2092: [0.9999999999999999986 + 0.E-19*I, 2.999999999999999998 + 0.E-18*I]
2093: ? polint([0,2,3],[0,4,9],5)
2094: 25
2095: ? polred(x^5-2*x^4-4*x^3-96*x^2-352*x-568)
2096: [x - 1, x^5 - x^4 - 6*x^3 + 6*x^2 + 13*x - 5, x^5 - x^4 + 2*x^3 - 4*x^2 + x
2097: - 1, x^5 - x^4 + 4*x^3 - 2*x^2 + x - 1, x^5 + 4*x^3 - 4*x^2 + 8*x - 8]
2098: ? polred2(x^4-28*x^3-458*x^2+9156*x-25321)
2099:
2100: [1 x - 1]
2101:
2102: [1/115*x^2 - 14/115*x - 327/115 x^2 - 10]
2103:
2104: [3/1495*x^3 - 63/1495*x^2 - 1607/1495*x + 13307/1495 x^4 - 32*x^2 + 216]
2105:
2106: [1/4485*x^3 - 7/1495*x^2 - 1034/4485*x + 7924/4485 x^4 - 8*x^2 + 6]
2107:
2108: ? polredabs(x^5-2*x^4-4*x^3-96*x^2-352*x-568)
2109: x^5 - x^4 + 2*x^3 - 4*x^2 + x - 1
2110: ? polredabs2(x^5-2*x^4-4*x^3-96*x^2-352*x-568)
2111: [x^5 - x^4 + 2*x^3 - 4*x^2 + x - 1, mod(2*x^4 - x^3 + 3*x^2 - 3*x - 1, x^5 -
2112: x^4 + 2*x^3 - 4*x^2 + x - 1)]
2113: ? polsym(x^17-1,17)
2114: [17, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17]~
2115: ? polvar(name^4-other)
2116: name
2117: ? poly(sin(x),x)
2118: -1/1307674368000*x^15 + 1/6227020800*x^13 - 1/39916800*x^11 + 1/362880*x^9 -
2119: 1/5040*x^7 + 1/120*x^5 - 1/6*x^3 + x
2120: ? polylog(5,0.5)
2121: 0.5084005792422687065
2122: ? polylog(-4,t)
2123: (t^4 + 11*t^3 + 11*t^2 + t)/(-t^5 + 5*t^4 - 10*t^3 + 10*t^2 - 5*t + 1)
2124: ? polylogd(5,0.5)
2125: 1.033792745541689061
2126: ? polylogdold(5,0.5)
2127: 1.034459423449010483
2128: ? polylogp(5,0.5)
2129: 0.9495693489964922581
2130: ? poly([1,2,3,4,5],x)
2131: x^4 + 2*x^3 + 3*x^2 + 4*x + 5
2132: ? polyrev([1,2,3,4,5],x)
2133: 5*x^4 + 4*x^3 + 3*x^2 + 2*x + 1
2134: ? polzag(6,3)
2135: 4608*x^6 - 13824*x^5 + 46144/3*x^4 - 23168/3*x^3 + 5032/3*x^2 - 120*x + 1
2136: ? postdraw([0,20,20])
2137: ? postploth(x=-5,5,sin(x))
2138: [-5.000000000000000000, 5.000000000000000000, -0.9999964107564721649, 0.9999
2139: 964107564721649]
2140: ? postploth2(t=0,2*pi,[sin(5*t),sin(7*t)])
2141: [-0.9999994509568810308, 0.9999994509568810308, -0.9999994509568810308, 0.99
2142: 99994509568810308]
2143: ? postplothraw(vector(100,k,k),vector(100,k,k*k/100))
2144: [1.000000000000000000, 100.0000000000000000, 0.01000000000000000020, 100.000
2145: 0000000000000]
2146: ? powell(acurve,apoint,10)
2147: [-28919032218753260057646013785951999/292736325329248127651484680640160000,
2148: 478051489392386968218136375373985436596569736643531551/158385319626308443937
2149: 475969221994173751192384064000000]
2150: ? cmcurve=initell([0,-3/4,0,-2,-1])
1.2 ! noro 2151: [0, -3/4, 0, -2, -1, -3, -4, -4, -1, 105, 1323, -343, -3375, [2.000000000000
! 2152: 000000, -0.6250000000000000000 + 0.3307189138830738238*I, -0.625000000000000
1.1 noro 2153: 0000 - 0.3307189138830738238*I]~, 1.933311705616811546, 0.966655852808405773
1.2 ! noro 2154: 3 + 2.557530989916099474*I, -0.8558486330998558525 - 4.59882981 E-20*I, -0.4
! 2155: 279243165499279261 - 2.757161217166147204*I, 4.944504600282546727]
1.1 noro 2156: ? powell(cmcurve,[x,y],quadgen(-7))
2157: [((-2 + 3*w)*x^2 + (6 - w))/((-2 - 5*w)*x + (-4 - 2*w)), ((34 - 11*w)*x^3 +
2158: (40 - 28*w)*x^2 + (22 + 23*w)*x)/((-90 - w)*x^2 + (-136 + 44*w)*x + (-40 + 2
2159: 8*w))]
2160: ? powrealraw(qfr(5,3,-1,0.),3)
2161: qfr(125, 23, 1, 0.E-18)
2162: ? pprint((x-12*y)/(y+13*x));
2163: (-(11 /14))
2164: ? pprint([1,2;3,4])
2165:
2166: [1 2]
2167:
2168: [3 4]
2169:
2170: ? pprint1(x+y);pprint(x+y);
2171: (2 x)(2 x)
2172: ? \precision=96
2173: realprecision = 96 significant digits
2174: ? pi
2175: 3.14159265358979323846264338327950288419716939937510582097494459230781640628
2176: 620899862803482534211
2177: ? prec(pi,20)
2178: 3.141592653589793238462643383
2179: ? precision(cmcurve)
2180: 19
2181: ? \precision=38
2182: realprecision = 38 significant digits
2183: ? prime(100)
2184: 541
2185: ? primedec(nf,2)
1.2 ! noro 2186: [[2, [3, 0, 1, 0, 0]~, 1, 1, [0, 0, 0, 1, 1]~], [2, [12, -4, -2, 11, 3]~, 1,
! 2187: 4, [1, 0, 1, 0, 0]~]]
1.1 noro 2188: ? primedec(nf,3)
1.2 ! noro 2189: [[3, [1, 0, 1, 0, 0]~, 1, 1, [1, -1, -1, -1, 0]~], [3, [-1, -1, -1, 0, 0]~,
! 2190: 2, 2, [0, 2, 2, 1, 0]~]]
1.1 noro 2191: ? primedec(nf,11)
2192: [[11, [11, 0, 0, 0, 0]~, 1, 5, [1, 0, 0, 0, 0]~]]
2193: ? primes(100)
2194: [2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71,
2195: 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151,
2196: 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 2
2197: 39, 241, 251, 257, 263, 269, 271, 277, 281, 283, 293, 307, 311, 313, 317, 33
2198: 1, 337, 347, 349, 353, 359, 367, 373, 379, 383, 389, 397, 401, 409, 419, 421
2199: , 431, 433, 439, 443, 449, 457, 461, 463, 467, 479, 487, 491, 499, 503, 509,
2200: 521, 523, 541]
2201: ? forprime(p=2,100,print(p," ",lift(primroot(p))))
2202: 2 1
2203: 3 2
2204: 5 2
2205: 7 3
2206: 11 2
2207: 13 2
2208: 17 3
2209: 19 2
2210: 23 5
2211: 29 2
2212: 31 3
2213: 37 2
2214: 41 6
2215: 43 3
2216: 47 5
2217: 53 2
2218: 59 2
2219: 61 2
2220: 67 2
2221: 71 7
2222: 73 5
2223: 79 3
2224: 83 2
2225: 89 3
2226: 97 5
2227: ? principalideal(nf,mod(x^3+5,nfpol))
2228:
2229: [6]
2230:
1.2 ! noro 2231: [1]
! 2232:
! 2233: [3]
1.1 noro 2234:
2235: [1]
2236:
2237: [3]
2238:
2239: ? principalidele(nf,mod(x^3+5,nfpol))
1.2 ! noro 2240: [[6; 1; 3; 1; 3], [2.2324480827796254080981385584384939684 + 3.1415926535897
! 2241: 932384626433832795028841*I, 5.0387659675158716386435353106610489967 + 1.5851
1.1 noro 2242: 760343512250049897278861965702423*I, 4.2664040272651028743625910797589683173
1.2 ! noro 2243: - 0.0083630478144368246110910258645462996226*I]]
1.1 noro 2244: ? print((x-12*y)/(y+13*x));
2245: -11/14
2246: ? print([1,2;3,4])
2247: [1, 2; 3, 4]
2248: ? print1(x+y);print1(" equals ");print(x+y);
2249: 2*x equals 2*x
2250: ? prod(1,k=1,10,1+1/k!)
2251: 3335784368058308553334783/905932868585678438400000
2252: ? prod(1.,k=1,10,1+1/k!)
2253: 3.6821540356142043935732308433185262945
2254: ? pi^2/6*prodeuler(p=2,10000,1-p^-2)
1.2 ! noro 2255: 1.0000098157493066238697591433298145166
1.1 noro 2256: ? prodinf(n=0,(1+2^-n)/(1+2^(-n+1)))
1.2 ! noro 2257: 0.33333333333333333333333333333333333313
1.1 noro 2258: ? prodinf1(n=0,-2^-n/(1+2^(-n+1)))
1.2 ! noro 2259: 0.33333333333333333333333333333333333313
1.1 noro 2260: ? psi(1)
1.2 ! noro 2261: -0.57721566490153286060651209008240243104
1.1 noro 2262: ? quaddisc(-252)
2263: -7
2264: ? quadgen(-11)
2265: w
2266: ? quadpoly(-11)
2267: x^2 - x + 3
2268: ? rank(matrix(5,5,x,y,x+y))
2269: 2
1.2 ! noro 2270: ? rayclassno(bnf,[[5,4;0,1],[1,0]])
1.1 noro 2271: 12
2272: ? rayclassnolist(bnf,lu)
2273: [[3], [], [3, 3], [3], [6, 6], [], [], [], [3, 3, 3], [], [3, 3], [3, 3], []
2274: , [], [12, 6, 6, 12], [3], [3, 3], [], [9, 9], [6, 6], [], [], [], [], [6, 1
2275: 2, 6], [], [3, 3, 3, 3], [], [], [], [], [], [3, 6, 6, 3], [], [], [9, 3, 9]
2276: , [6, 6], [], [], [], [], [], [3, 3], [3, 3], [12, 12, 6, 6, 12, 12], [], []
2277: , [6, 6], [9], [], [3, 3, 3, 3], [], [3, 3], [], [6, 12, 12, 6]]
2278: ? move(0,50,50);rbox(0,50,50)
2279: ? print1("give a value for s? ");s=read();print(1/s)
2280: give a value for s? 37.
2281: 0.027027027027027027027027027027027027026
2282: ? real(5-7*i)
2283: 5
2284: ? recip(3*x^7-5*x^3+6*x-9)
2285: -9*x^7 + 6*x^6 - 5*x^4 + 3
2286: ? redimag(qfi(3,10,12))
2287: qfi(3, -2, 4)
2288: ? redreal(qfr(3,10,-20,1.5))
2289: qfr(3, 16, -7, 1.5000000000000000000000000000000000000)
2290: ? redrealnod(qfr(3,10,-20,1.5),18)
2291: qfr(3, 16, -7, 1.5000000000000000000000000000000000000)
2292: ? reduceddisc(x^3+4*x+12)
2293: [1036, 4, 1]
2294: ? regula(17)
2295: 2.0947125472611012942448228460655286534
2296: ? kill(y);print(x+y);reorder([x,y]);print(x+y);
2297: x + y
2298: x + y
2299: ? resultant(x^3-1,x^3+1)
2300: 8
2301: ? resultant2(x^3-1.,x^3+1.)
2302: 8.0000000000000000000000000000000000000
2303: ? reverse(tan(x))
2304: x - 1/3*x^3 + 1/5*x^5 - 1/7*x^7 + 1/9*x^9 - 1/11*x^11 + 1/13*x^13 - 1/15*x^1
2305: 5 + O(x^16)
2306: ? rhoreal(qfr(3,10,-20,1.5))
2307: qfr(-20, -10, 3, 2.1074451073987839947135880252731470615)
2308: ? rhorealnod(qfr(3,10,-20,1.5),18)
2309: qfr(-20, -10, 3, 1.5000000000000000000000000000000000000)
2310: ? rline(0,200,150)
2311: ? cursor(0)
2312: ? rmove(0,5,5);cursor(0)
2313: ? rndtoi(prod(1,k=1,17,x-exp(2*i*pi*k/17)))
2314: x^17 - 1
2315: ? qpol=y^3-y-1;setrand(1);bnf2=buchinit(qpol);nf2=bnf2[7];
2316: ? un=mod(1,qpol);w=mod(y,qpol);p=un*(x^5-5*x+w)
2317: mod(1, y^3 - y - 1)*x^5 + mod(-5, y^3 - y - 1)*x + mod(y, y^3 - y - 1)
2318: ? aa=rnfpseudobasis(nf2,p)
2319: [[[1, 0, 0]~, [0, 0, 0]~, [0, 0, 0]~, [-2, 0, 0]~, [11, 0, 0]~; [0, 0, 0]~,
2320: [1, 0, 0]~, [0, 0, 0]~, [2, 0, 0]~, [-8, 0, 0]~; [0, 0, 0]~, [0, 0, 0]~, [1,
2321: 0, 0]~, [1, 0, 0]~, [4, 0, 0]~; [0, 0, 0]~, [0, 0, 0]~, [0, 0, 0]~, [1, 0,
2322: 0]~, [-2, 0, 0]~; [0, 0, 0]~, [0, 0, 0]~, [0, 0, 0]~, [0, 0, 0]~, [1, 0, 0]~
2323: ], [[1, 0, 0; 0, 1, 0; 0, 0, 1], [1, 0, 0; 0, 1, 0; 0, 0, 1], [1, 0, 0; 0, 1
1.2 ! noro 2324: , 0; 0, 0, 1], [1, 0, 2/5; 0, 1, 3/5; 0, 0, 1/5], [1, 0, 22/25; 0, 1, 8/25;
! 2325: 0, 0, 1/25]], [416134375, 202396875, 60056800; 0, 3125, 2700; 0, 0, 25], [-1
! 2326: 275, 5, 5]~]
1.1 noro 2327: ? rnfbasis(bnf2,aa)
2328:
1.2 ! noro 2329: [[1, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [-6/25, 66/25, 77/25]~ [-391/25, -699/25,
! 2330: 197/25]~]
1.1 noro 2331:
1.2 ! noro 2332: [[0, 0, 0]~ [1, 0, 0]~ [0, 0, 0]~ [18/25, -48/25, -56/25]~ [268/25, 552/25,
! 2333: -206/25]~]
1.1 noro 2334:
1.2 ! noro 2335: [[0, 0, 0]~ [0, 0, 0]~ [1, 0, 0]~ [41/25, 24/25, 28/25]~ [-194/25, -116/25,
! 2336: -127/25]~]
1.1 noro 2337:
1.2 ! noro 2338: [[0, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [17/25, -12/25, -14/25]~ [52/25, 178/25, -
! 2339: 109/25]~]
1.1 noro 2340:
1.2 ! noro 2341: [[0, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [4/25, 6/25, 7/25]~ [-41/25, -49/25, -3/25
! 2342: ]~]
1.1 noro 2343:
2344: ? rnfdiscf(nf2,p)
1.2 ! noro 2345: [[416134375, 202396875, 60056800; 0, 3125, 2700; 0, 0, 25], [-1275, 5, 5]~]
1.1 noro 2346: ? rnfequation(nf2,p)
2347: x^15 - 15*x^11 + 75*x^7 - x^5 - 125*x^3 + 5*x + 1
2348: ? rnfequation2(nf2,p)
2349: [x^15 - 15*x^11 + 75*x^7 - x^5 - 125*x^3 + 5*x + 1, mod(-x^5 + 5*x, x^15 - 1
2350: 5*x^11 + 75*x^7 - x^5 - 125*x^3 + 5*x + 1), 0]
2351: ? rnfhermitebasis(bnf2,aa)
2352:
1.2 ! noro 2353: [[1, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [6/5, 4/5, -2/5]~ [-22/25, -33/25, 99/25]~
1.1 noro 2354: ]
2355:
1.2 ! noro 2356: [[0, 0, 0]~ [1, 0, 0]~ [0, 0, 0]~ [-6/5, -4/5, 2/5]~ [16/25, 24/25, -72/25]~
! 2357: ]
1.1 noro 2358:
1.2 ! noro 2359: [[0, 0, 0]~ [0, 0, 0]~ [1, 0, 0]~ [-3/5, -2/5, 1/5]~ [-8/25, -12/25, 36/25]~
! 2360: ]
1.1 noro 2361:
1.2 ! noro 2362: [[0, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [-3/5, -2/5, 1/5]~ [4/25, 6/25, -18/25]~]
1.1 noro 2363:
1.2 ! noro 2364: [[0, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [0, 0, 0]~ [-2/25, -3/25, 9/25]~]
1.1 noro 2365:
2366: ? rnfisfree(bnf2,aa)
2367: 1
2368: ? rnfsteinitz(nf2,aa)
1.2 ! noro 2369: [[[1, 0, 0]~, [0, 0, 0]~, [0, 0, 0]~, [-6/25, 66/25, 77/25]~, [17/125, -66/1
! 2370: 25, -77/125]~; [0, 0, 0]~, [1, 0, 0]~, [0, 0, 0]~, [18/25, -48/25, -56/25]~,
! 2371: [-26/125, 48/125, 56/125]~; [0, 0, 0]~, [0, 0, 0]~, [1, 0, 0]~, [41/25, 24/
! 2372: 25, 28/25]~, [-37/125, -24/125, -28/125]~; [0, 0, 0]~, [0, 0, 0]~, [0, 0, 0]
! 2373: ~, [17/25, -12/25, -14/25]~, [-19/125, 12/125, 14/125]~; [0, 0, 0]~, [0, 0,
! 2374: 0]~, [0, 0, 0]~, [4/25, 6/25, 7/25]~, [-3/125, -6/125, -7/125]~], [[1, 0, 0;
! 2375: 0, 1, 0; 0, 0, 1], [1, 0, 0; 0, 1, 0; 0, 0, 1], [1, 0, 0; 0, 1, 0; 0, 0, 1]
! 2376: , [1, 0, 0; 0, 1, 0; 0, 0, 1], [125, 0, 22; 0, 125, 108; 0, 0, 1]], [4161343
! 2377: 75, 202396875, 60056800; 0, 3125, 2700; 0, 0, 25], [-1275, 5, 5]~]
1.1 noro 2378: ? rootmod(x^16-1,41)
2379: [mod(1, 41), mod(3, 41), mod(9, 41), mod(14, 41), mod(27, 41), mod(32, 41),
2380: mod(38, 41), mod(40, 41)]~
2381: ? rootpadic(x^4+1,41,6)
2382: [3 + 22*41 + 27*41^2 + 15*41^3 + 27*41^4 + 33*41^5 + O(41^6), 14 + 20*41 + 2
2383: 5*41^2 + 24*41^3 + 4*41^4 + 18*41^5 + O(41^6), 27 + 20*41 + 15*41^2 + 16*41^
2384: 3 + 36*41^4 + 22*41^5 + O(41^6), 38 + 18*41 + 13*41^2 + 25*41^3 + 13*41^4 +
2385: 7*41^5 + O(41^6)]~
2386: ? roots(x^5-5*x^2-5*x-5)
2387: [2.0509134529831982130058170163696514536 + 0.E-38*I, -0.67063790319207539268
2388: 663382582902335603 + 0.84813118358634026680538906224199030917*I, -0.67063790
2389: 319207539268663382582902335603 - 0.84813118358634026680538906224199030917*I,
2390: -0.35481882329952371381627468235580237077 + 1.39980287391035466982975228340
2391: 62081964*I, -0.35481882329952371381627468235580237077 - 1.399802873910354669
2392: 8297522834062081964*I]~
2393: ? rootsold(x^4-1000000000000000000000)
2394: [-177827.94100389228012254211951926848447 + 0.E-38*I, 177827.941003892280122
2395: 54211951926848447 + 0.E-38*I, 6.6530622500127354998594589316364200753 E-111
2396: + 177827.94100389228012254211951926848447*I, 6.65306225001273549985945893163
2397: 64200753 E-111 - 177827.94100389228012254211951926848447*I]~
2398: ? round(prod(1,k=1,17,x-exp(2*i*pi*k/17)))
2399: x^17 - 1
2400: ? rounderror(prod(1,k=1,17,x-exp(2*i*pi*k/17)))
2401: -35
2402: ? rpoint(0,20,20)
2403: ? initrect(3,600,600);scale(3,-7,7,-2,2);cursor(3)
2404: ? q*series(anell(acurve,100),q)
2405: q - 2*q^2 - 3*q^3 + 2*q^4 - 2*q^5 + 6*q^6 - q^7 + 6*q^9 + 4*q^10 - 5*q^11 -
2406: 6*q^12 - 2*q^13 + 2*q^14 + 6*q^15 - 4*q^16 - 12*q^18 - 4*q^20 + 3*q^21 + 10*
2407: q^22 + 2*q^23 - q^25 + 4*q^26 - 9*q^27 - 2*q^28 + 6*q^29 - 12*q^30 - 4*q^31
2408: + 8*q^32 + 15*q^33 + 2*q^35 + 12*q^36 - q^37 + 6*q^39 - 9*q^41 - 6*q^42 + 2*
2409: q^43 - 10*q^44 - 12*q^45 - 4*q^46 - 9*q^47 + 12*q^48 - 6*q^49 + 2*q^50 - 4*q
2410: ^52 + q^53 + 18*q^54 + 10*q^55 - 12*q^58 + 8*q^59 + 12*q^60 - 8*q^61 + 8*q^6
2411: 2 - 6*q^63 - 8*q^64 + 4*q^65 - 30*q^66 + 8*q^67 - 6*q^69 - 4*q^70 + 9*q^71 -
2412: q^73 + 2*q^74 + 3*q^75 + 5*q^77 - 12*q^78 + 4*q^79 + 8*q^80 + 9*q^81 + 18*q
2413: ^82 - 15*q^83 + 6*q^84 - 4*q^86 - 18*q^87 + 4*q^89 + 24*q^90 + 2*q^91 + 4*q^
2414: 92 + 12*q^93 + 18*q^94 - 24*q^96 + 4*q^97 + 12*q^98 - 30*q^99 - 2*q^100 + O(
2415: q^101)
2416: ? aset=set([5,-2,7,3,5,1])
2417: ["-2", "1", "3", "5", "7"]
2418: ? bset=set([7,5,-5,7,2])
2419: ["-5", "2", "5", "7"]
2420: ? setintersect(aset,bset)
2421: ["5", "7"]
2422: ? setminus(aset,bset)
2423: ["-2", "1", "3"]
2424: ? setprecision(28)
2425: 38
2426: ? setrand(10)
2427: 10
2428: ? setsearch(aset,3)
2429: 3
2430: ? setsearch(bset,3)
2431: 0
2432: ? setserieslength(12)
2433: 16
2434: ? setunion(aset,bset)
2435: ["-2", "-5", "1", "2", "3", "5", "7"]
2436: ? arat=(x^3+x+1)/x^3;settype(arat,14)
2437: (x^3 + x + 1)/x^3
2438: ? shift(1,50)
2439: 1125899906842624
2440: ? shift([3,4,-11,-12],-2)
2441: [0, 1, -2, -3]
2442: ? shiftmul([3,4,-11,-12],-2)
2443: [3/4, 1, -11/4, -3]
2444: ? sigma(100)
2445: 217
2446: ? sigmak(2,100)
2447: 13671
2448: ? sigmak(-3,100)
2449: 1149823/1000000
2450: ? sign(-1)
2451: -1
2452: ? sign(0)
2453: 0
2454: ? sign(0.)
2455: 0
2456: ? signat(hilbert(5)-0.11*idmat(5))
2457: [2, 3]
2458: ? signunit(bnf)
2459:
2460: [-1]
2461:
2462: [1]
2463:
2464: ? simplefactmod(x^11+1,7)
2465:
2466: [1 1]
2467:
2468: [10 1]
2469:
2470: ? simplify(((x+i+1)^2-x^2-2*x*(i+1))^2)
2471: -4
2472: ? sin(pi/6)
2473: 0.4999999999999999999999999999
2474: ? sinh(1)
2475: 1.175201193643801456882381850
2476: ? size([1.3*10^5,2*i*pi*exp(4*pi)])
2477: 7
2478: ? smallbasis(x^3+4*x+12)
2479: [1, x, 1/2*x^2]
2480: ? smalldiscf(x^3+4*x+12)
2481: -1036
2482: ? smallfact(100!+1)
2483:
2484: [101 1]
2485:
2486: [14303 1]
2487:
2488: [149239 1]
2489:
2490: [432885273849892962613071800918658949059679308685024481795740765527568493010
2491: 727023757461397498800981521440877813288657839195622497225621499427628453 1]
2492:
2493: ? smallinitell([0,0,0,-17,0])
2494: [0, 0, 0, -17, 0, 0, -34, 0, -289, 816, 0, 314432, 1728]
2495: ? smallpolred(x^4+576)
2496: [x - 1, x^2 - x + 1, x^2 + 1, x^4 - x^2 + 1]
2497: ? smallpolred2(x^4+576)
2498:
2499: [1 x - 1]
2500:
1.2 ! noro 2501: [1/192*x^3 + 1/8*x + 1/2 x^2 - x + 1]
1.1 noro 2502:
2503: [-1/24*x^2 x^2 + 1]
2504:
2505: [-1/192*x^3 + 1/48*x^2 + 1/8*x x^4 - x^2 + 1]
2506:
2507: ? smith(matrix(5,5,j,k,random()))
1.2 ! noro 2508: [239509529380671174817611776, 2147483648, 2147483648, 1, 1]
1.1 noro 2509: ? smith(1/hilbert(6))
2510: [27720, 2520, 2520, 840, 210, 6]
2511: ? smithpol(x*idmat(5)-matrix(5,5,j,k,1))
2512: [x^2 - 5*x, x, x, x, 1]
2513: ? solve(x=1,4,sin(x))
2514: 3.141592653589793238462643383
2515: ? sort(vector(17,x,5*x%17))
2516: [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16]
2517: ? sqr(1+o(2))
2518: 1 + O(2^3)
2519: ? sqred(hilbert(5))
2520:
2521: [1 1/2 1/3 1/4 1/5]
2522:
2523: [0 1/12 1 9/10 4/5]
2524:
2525: [0 0 1/180 3/2 12/7]
2526:
2527: [0 0 0 1/2800 2]
2528:
2529: [0 0 0 0 1/44100]
2530:
2531: ? sqrt(13+o(127^12))
2532: 34 + 125*127 + 83*127^2 + 107*127^3 + 53*127^4 + 42*127^5 + 22*127^6 + 98*12
2533: 7^7 + 127^8 + 23*127^9 + 122*127^10 + 79*127^11 + O(127^12)
2534: ? srgcd(x^10-1,x^15-1)
2535: x^5 - 1
2536: ? move(0,100,100);string(0,pi)
2537: ? move(0,200,200);string(0,"(0,0)")
2538: ? postdraw([0,10,10])
2539: ? apol=0.3+legendre(10)
2540: 46189/256*x^10 - 109395/256*x^8 + 45045/128*x^6 - 15015/128*x^4 + 3465/256*x
2541: ^2 + 0.05390624999999999999999999999
2542: ? sturm(apol)
2543: 4
2544: ? sturmpart(apol,0.91,1)
2545: 1
2546: ? subcyclo(31,5)
2547: x^5 + x^4 - 12*x^3 - 21*x^2 + x + 5
2548: ? subell(initell([0,0,0,-17,0]),[-1,4],[-4,2])
2549: [9, -24]
2550: ? subst(sin(x),x,y)
2551: y - 1/6*y^3 + 1/120*y^5 - 1/5040*y^7 + 1/362880*y^9 - 1/39916800*y^11 + O(y^
2552: 12)
2553: ? subst(sin(x),x,x+x^2)
2554: x + x^2 - 1/6*x^3 - 1/2*x^4 - 59/120*x^5 - 1/8*x^6 + 419/5040*x^7 + 59/720*x
2555: ^8 + 13609/362880*x^9 + 19/13440*x^10 - 273241/39916800*x^11 + O(x^12)
2556: ? sum(0,k=1,10,2^-k)
2557: 1023/1024
2558: ? sum(0.,k=1,10,2^-k)
2559: 0.9990234375000000000000000000
2560: ? sylvestermatrix(a2*x^2+a1*x+a0,b1*x+b0)
2561:
2562: [a2 b1 0]
2563:
2564: [a1 b0 b1]
2565:
2566: [a0 0 b0]
2567:
2568: ? \precision=38
2569: realprecision = 38 significant digits
2570: ? 4*sumalt(n=0,(-1)^n/(2*n+1))
2571: 3.1415926535897932384626433832795028841
2572: ? 4*sumalt2(n=0,(-1)^n/(2*n+1))
2573: 3.1415926535897932384626433832795028842
2574: ? suminf(n=1,2.^-n)
2575: 0.99999999999999999999999999999999999999
2576: ? 6/pi^2*sumpos(n=1,n^-2)
2577: 0.99999999999999999999999999999999999999
2578: ? supplement([1,3;2,4;3,6])
2579:
2580: [1 3 0]
2581:
2582: [2 4 0]
2583:
2584: [3 6 1]
2585:
2586: ? sqr(tan(pi/3))
2587: 2.9999999999999999999999999999999999999
2588: ? tanh(1)
2589: 0.76159415595576488811945828260479359041
2590: ? taniyama(bcurve)
2591: [x^-2 - x^2 + 3*x^6 - 2*x^10 + O(x^11), -x^-3 + 3*x - 3*x^5 + 8*x^9 + O(x^10
2592: )]
2593: ? taylor(y/(x-y),y)
2594: (O(y^12)*x^11 + y*x^10 + y^2*x^9 + y^3*x^8 + y^4*x^7 + y^5*x^6 + y^6*x^5 + y
2595: ^7*x^4 + y^8*x^3 + y^9*x^2 + y^10*x + y^11)/x^11
2596: ? tchebi(10)
2597: 512*x^10 - 1280*x^8 + 1120*x^6 - 400*x^4 + 50*x^2 - 1
2598: ? teich(7+o(127^12))
2599: 7 + 57*127 + 58*127^2 + 83*127^3 + 52*127^4 + 109*127^5 + 74*127^6 + 16*127^
2600: 7 + 60*127^8 + 47*127^9 + 65*127^10 + 5*127^11 + O(127^12)
2601: ? texprint((x+y)^3/(x-y)^2)
2602: {{x^{3} + {{3}y}x^{2} + {{3}y^{2}}x + {y^{3}}}\over{x^{2} - {{2}y}x + {y^{2}
2603: }}}
2604: ? theta(0.5,3)
2605: 0.080806418251894691299871683210466298535
2606: ? thetanullk(0.5,7)
2607: -804.63037320243369422783730584965684022
2608: ? torsell(tcurve)
2609: [12, [6, 2], [[-2, 8], [3, -2]]]
2610: ? trace(1+i)
2611: 2
2612: ? trace(mod(x+5,x^3+x+1))
2613: 15
2614: ? trans(vector(2,x,x))
2615: [1, 2]~
2616: ? %*%~
2617:
2618: [1 2]
2619:
2620: [2 4]
2621:
2622: ? trunc(-2.7)
2623: -2
2624: ? trunc(sin(x^2))
2625: 1/120*x^10 - 1/6*x^6 + x^2
2626: ? tschirnhaus(x^5-x-1)
1.2 ! noro 2627: x^5 + 20*x^4 + 158*x^3 + 616*x^2 + 1185*x + 899
1.1 noro 2628: ? type(mod(x,x^2+1))
2629: 9
2630: ? unit(17)
2631: 3 + 2*w
2632: ? n=33;until(n==1,print1(n," ");if(n%2,n=3*n+1,n=n/2));print(1)
2633: 33 100 50 25 76 38 19 58 29 88 44 22 11 34 17 52 26 13 40 20 10 5 16 8 4 2 1
2634: ? valuation(6^10000-1,5)
2635: 5
2636: ? vec(sin(x))
2637: [1, 0, -1/6, 0, 1/120, 0, -1/5040, 0, 1/362880, 0, -1/39916800]
2638: ? vecmax([-3,7,-2,11])
2639: 11
2640: ? vecmin([-3,7,-2,11])
2641: -3
2642: ? vecsort([[1,8,5],[2,5,8],[3,6,-6],[4,8,6]],2)
2643: [[2, 5, 8], [3, 6, -6], [4, 8, 6], [1, 8, 5]]
2644: ? vecsort([[1,8,5],[2,5,8],[3,6,-6],[4,8,6]],[2,1])
2645: [[2, 5, 8], [3, 6, -6], [1, 8, 5], [4, 8, 6]]
2646: ? weipell(acurve)
2647: x^-2 + 1/5*x^2 - 1/28*x^4 + 1/75*x^6 - 3/1540*x^8 + 1943/3822000*x^10 - 1/11
2648: 550*x^12 + 193/10510500*x^14 - 1269/392392000*x^16 + 21859/34684650000*x^18
2649: - 1087/9669660000*x^20 + O(x^22)
2650: ? wf(i)
2651: 1.1892071150027210667174999705604759152 - 1.17549435 E-38*I
2652: ? wf2(i)
2653: 1.0905077326652576592070106557607079789 + 0.E-48*I
2654: ? m=5;while(m<20,print1(m," ");m=m+1);print()
2655: 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
2656: ? zell(acurve,apoint)
2657: 0.72491221490962306778878739838332384646 + 0.E-58*I
2658: ? zeta(3)
2659: 1.2020569031595942853997381615114499907
2660: ? zeta(0.5+14.1347251*i)
2661: 0.0000000052043097453468479398562848599419244606 - 0.00000003269063986978698
2662: 2176409251733800562856*I
2663: ? zetak(nfz,-3)
2664: 0.091666666666666666666666666666666666666
2665: ? zetak(nfz,1.5+3*i)
2666: 0.88324345992059326405525724366416928890 - 0.2067536250233895222724230899142
2667: 7938845*I
2668: ? zidealstar(nf2,54)
1.2 ! noro 2669: [132678, [1638, 9, 9], [[-14, -4, 19]~, [1, 0, -24]~, [7, -6, 6]~]]
1.1 noro 2670: ? bid=zidealstarinit(nf2,54)
2671: [[[54, 0, 0; 0, 54, 0; 0, 0, 54], [0]], [132678, [1638, 9, 9]], [[2, [2, 0,
2672: 0]~, 1, 3, [1, 0, 0]~], 1; [3, [3, 0, 0]~, 1, 3, [1, 0, 0]~], 3], [[[[7], [[
1.2 ! noro 2673: 1, 0, 1]~], [[1, 0, -27]~], [[]~], 1]], [[[26], [[3, 2, 0]~], [[3, 2, 0]~],
! 2674: [[]~], 1], [[3, 3, 3], [[1, 3, 0]~, [1, 0, 3]~, [4, 0, 0]~], [[1, -24, 0]~,
! 2675: [1, 0, -24]~, [-23, 0, 0]~], [[]~, []~, []~], [0, 1/3, 0; 0, 0, 1/3; 1/3, 0,
! 2676: 0]], [[3, 3, 3], [[1, 9, 0]~, [1, 0, 9]~, [10, 0, 0]~], [[1, -18, 0]~, [1,
! 2677: 0, -18]~, [-17, 0, 0]~], [[]~, []~, []~], [0, 1/9, 0; 0, 0, 1/9; 1/9, 0, 0]]
! 2678: ], [[], [], [;]]], [2106, -77, 0, -11102, 2184, 0, 6006, -13104; 0, 0, 1, -3
! 2679: , 0, -6, 0, 0; -27, 1, 0, 142, -28, 0, -78, 168]]
1.1 noro 2680: ? zideallog(nf2,w,bid)
1.2 ! noro 2681: [1234, 0, 5]~
1.1 noro 2682: ? znstar(3120)
2683: [768, [12, 4, 4, 2, 2], [mod(67, 3120), mod(2341, 3120), mod(1847, 3120), mo
2684: d(391, 3120), mod(2081, 3120)]]
2685: ? getstack()
2686: 0
2687: ? getheap()
1.2 ! noro 2688: [620, 118299]
1.1 noro 2689: ? print("Total time spent: ",gettime());
1.2 ! noro 2690: Total time spent: 1400
1.1 noro 2691: ? \q
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to compat CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib / pari-2.2 / src / test / 32