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

Timestamp:

Apr 22, 2005, 2:44:06 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

690e8646551b6c99b392da8f4540b4bff569df97

Parents:

1e8e9c929fd88f718639680e809c49a6af6b3860

Message:

*hannes: new libs


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

File:

• Tst/Buch/Proc_4_6.tst (modified) (4 diffs)

Tst/Buch/Proc_4_6.tst

@@ -3 +3 @@
 
 LIB"ring.lib";
-proc primaryTest(ideal i, poly p)
-"USAGE:   primaryTest(i,p); i standard basis with respect to
+proc PrimaryTest(ideal i, poly p)
+"USAGE:   PrimaryTest(i,p); i standard basis with respect to
           lp, p irreducible polynomial in K[var(n)], 
           p^a=i[1] for some a;
@@ -43 +43 @@
    ring s=(0,x),(d,e,f,g),lp;
    ideal i=g^5,(x*f-g)^3,5*e-g^2,x*d^3;
-   primaryTest(i,g);
+   PrimaryTest(i,g);
    kill s;
 
@@ -80 +80 @@
      p=fac[1][k]^fac[2][k];
      primary=groebner(j+p);
-     prim=primaryTest(primary,fac[1][k]);
+     prim=PrimaryTest(primary,fac[1][k]);
 //---test whether all ideals were primary and in general 
 //   position
@@ -174 +174 @@
 }
 
-LIB"elim.lib";
+//LIB"elim.lib";
 proc decomp(ideal i)
 "USAGE:  decomp(i); i ideal