Changeset 511c38 in git for Tst/Buch/Proc_4_6.tst


Ignore:
Timestamp:
Apr 22, 2005, 2:44:06 PM (19 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
690e8646551b6c99b392da8f4540b4bff569df97
Parents:
1e8e9c929fd88f718639680e809c49a6af6b3860
Message:
*hannes: new libs


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

Legend:

Unmodified
Added
Removed
  • Tst/Buch/Proc_4_6.tst

    r1e8e9c r511c38  
    33
    44LIB"ring.lib";
    5 proc primaryTest(ideal i, poly p)
    6 "USAGE:   primaryTest(i,p); i standard basis with respect to
     5proc PrimaryTest(ideal i, poly p)
     6"USAGE:   PrimaryTest(i,p); i standard basis with respect to
    77          lp, p irreducible polynomial in K[var(n)],
    88          p^a=i[1] for some a;
     
    4343   ring s=(0,x),(d,e,f,g),lp;
    4444   ideal i=g^5,(x*f-g)^3,5*e-g^2,x*d^3;
    45    primaryTest(i,g);
     45   PrimaryTest(i,g);
    4646   kill s;
    4747
     
    8080     p=fac[1][k]^fac[2][k];
    8181     primary=groebner(j+p);
    82      prim=primaryTest(primary,fac[1][k]);
     82     prim=PrimaryTest(primary,fac[1][k]);
    8383//---test whether all ideals were primary and in general
    8484//   position
     
    174174}
    175175
    176 LIB"elim.lib";
     176//LIB"elim.lib";
    177177proc decomp(ideal i)
    178178"USAGE:  decomp(i); i ideal
Note: See TracChangeset for help on using the changeset viewer.