Changeset ad3dfe in git for Tst/Long/zeroset1.tst


Ignore:
Timestamp:
Apr 14, 2009, 12:29:45 PM (15 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
ecc6a3952b72008ad002a2495c5703a008644507
Parents:
346b725eab88cd8b630daf32c263f1068708f2c0
Message:
*hannes: new zeroset.lib


git-svn-id: file:///usr/local/Singular/svn/trunk@11689 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Tst/Long/zeroset1.tst

    r346b725 rad3dfe  
    2020
    2121tst_init();
    22 tst_ignore("CVS ID $Id: zeroset1.tst,v 1.1 2000-12-11 16:07:31 Singular Exp $");
     22tst_ignore("CVS ID $Id: zeroset1.tst,v 1.2 2009-04-14 10:29:45 Singular Exp $");
    2323 
    2424
    … …  
    3232        map F;
    3333
    34         print(" #Points = " + string(vdim(std(id))) + "; #Solutions = " + string(size(zeroset)));
     34        print(" #Points = " + string(vdim(std(id))) + "; #Solutions = " + string(size(theZeroset)));
    3535        print(" minpoly = " + string(minpoly));
    3636        print(" ideal = " + string(id));
    3737       
    3838
    39         for(int i = 1; i <= size(zeroset); i++) {
    40                 F = zeroset[i];
    41                 print(string(zeroset[i]) + " --> " + string(F(id)));
     39        for(int i = 1; i <= size(theZeroset); i++) {
     40                F = theZeroset[i];
     41                print(string(theZeroset[i]) + " --> " + string(F(id)));
    4242        }
    4343}
    … …  
    4848ideal I = x2-1,y3-1,z-2x;
    4949
    50 def S = ZeroSet(I);TestzerosetLIB(S);
     50def S = zeroSet(I);TestzerosetLIB(S);
    5151setring S;
    5252minpoly;
    5353id;
    54 zeroset;
     54theZeroset;
    5555
    5656kill R;
    … …  
    6363ideal I = x3-1,3y-x,z4-1;
    6464
    65 def S = ZeroSet(I);TestzerosetLIB(S);
     65def S = zeroSet(I);TestzerosetLIB(S);
    6666setring S;
    6767minpoly;
    6868id;
    69 zeroset;
     69theZeroset;
    7070       
    7171kill R;
    … …  
    7878ideal I = x(1)^2+1,x(2)^4-1,x(3)-x(4),x(4)^2+1,x(5)-x(4);
    7979
    80 def S = ZeroSet(I);TestzerosetLIB(S);
     80def S = zeroSet(I);TestzerosetLIB(S);
    8181setring S;
    8282minpoly;
    8383id;
    84 zeroset;
     84theZeroset;
    8585
    8686kill R;
    … …  
    9494ideal I = x2-a,y-2x;
    9595
    96 def S = ZeroSet(I);TestzerosetLIB(S);
     96def S = zeroSet(I);TestzerosetLIB(S);
    9797setring S;
    9898minpoly;
    9999id;
    100 zeroset;
     100theZeroset;
    101101
    102102kill R;
    … …  
    110110ideal I = x3-1,a*y^2-x,z^2-a*y;
    111111
    112 def S = ZeroSet(I);TestzerosetLIB(S);
     112def S = zeroSet(I);TestzerosetLIB(S);
    113113setring S;
    114114minpoly;
    115115id;
    116 zeroset;
     116theZeroset;
    117117
    118118kill R;
    … …  
    126126ideal I = x2-2,a*y^2-2*x,z^2 - a; // 2
    127127
    128 def S = ZeroSet(I);TestzerosetLIB(S);
     128def S = zeroSet(I);TestzerosetLIB(S);
    129129setring S;
    130130minpoly;
    131131id;
    132 zeroset;
     132theZeroset;
    133133
    134134kill R;
    … …  
    142142ideal I = x(1)^2 - 2,x(2) -a*x(1), x(3)^2 + 1, x(4)^2 + a, a*x(5) - x(1);
    143143
    144 def S = ZeroSet(I);TestzerosetLIB(S);
     144def S = zeroSet(I);TestzerosetLIB(S);
    145145setring S;
    146146minpoly;
    147147id;
    148 zeroset;
     148theZeroset;
    149149
    150150kill S;
    151151
    152152setring R;
    153 def S = ZeroSet(I, 1);TestzerosetLIB(S);
     153def S = zeroSet(I, 1);TestzerosetLIB(S);
    154154setring S;
    155155minpoly;
    156156id;
    157 zeroset;
     157theZeroset;
    158158
    159159kill R;
    … …  
    168168ideal I = s(3)*s(4),s(2)*s(4),s(1)*s(3),s(1)*s(2),s(3)^8+s(4)^8-1,s(2)^8+s(4)^8-1,s(1)^8-s(4)^8,s(4)^9-s(4),s(1)*s(4)^8-s(1);
    169169
    170 def S = ZeroSet(I);TestzerosetLIB(S);
     170def S = zeroSet(I);TestzerosetLIB(S);
    171171setring S;
    172172minpoly;
    173173id;
    174 zeroset;
     174theZeroset;
    175175
    176176kill S;
    177177
    178178setring R;
    179 def S = ZeroSet(I, 1);TestzerosetLIB(S);
     179def S = zeroSet(I, 1);TestzerosetLIB(S);
    180180setring S;
    181181minpoly;
    182182id;
    183 zeroset;
     183theZeroset;
    184184
    185185kill S;
Note: See TracChangeset for help on using the changeset viewer.