source: git/Tst/Manual/number_declarations.tst @ 6fb723

spielwiese
Last change on this file since 6fb723 was 894057, checked in by Oleksandr Motsak <motsak@…>, 13 years ago
ADD: Tests from online manual (res+stat on mamawutz): short ones Tst/Manual/s.lst
  • Property mode set to 100644
File size: 1001 bytes
Line 
1LIB "tst.lib"; tst_init();
2  // finite field Z/p, p<= 32003
3  ring r = 32003,(x,y,z),dp;
4  number n = 4/6;
5  n;
6  // finite field GF(p^n), p^n <= 32767
7  // z is a primitive root of the minimal polynomial
8  ring rg= (7^2,z),x,dp;
9  number n = 4/9+z;
10  n;
11  // the rational numbers
12  ring r0 = 0,x,dp;
13  number n = 4/6;
14  n;
15  // algebraic extensions of Z/p or Q
16  ring ra=(0,a),x,dp;
17  minpoly=a^2+1;
18  number n=a3+a2+2a-1;
19  n;
20  a^2;
21  // transcedental extensions of Z/p or Q
22  ring rt=(0,a),x,dp;
23  number n=a3+a2+2a-1;
24  n;
25  a^2;
26  // machine floating point numbers, single precision
27  ring R_0=real,x,dp;
28  number n=4/6;
29  n;
30  n=0.25e+2;
31  n;
32  // floating point numbers, arbitrary prescribed precision
33  ring R_1=(real,50),x,dp;
34  number n=4.0/6;
35  n;
36  n=0.25e+2;
37  n;
38  // floating point complex numbers, arbitrary prescribed precision
39  // the third parameter gives the name of the imaginary unit
40  ring R_2=(complex,50,i),x,dp;
41  number n=4.0/6;
42  n;
43  n=0.25e+2*i+n;
44  n;
45tst_status(1);$
Note: See TracBrowser for help on using the repository browser.