diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index 74a45e0..45abc0d 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -37297,16 +37297,16 @@ GroebnerPackage(Dom, Expon, VarSet, Dpol): T == C where
Pol=[] => Pol
Pol:=[x for x in Pol | x ^= 0]
Pol=[] => [0]
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,0,0)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,0,0)))
groebner( Pol: List(Dpol), xx1: String) ==
Pol=[] => Pol
Pol:=[x for x in Pol | x ^= 0]
Pol=[] => [0]
xx1 = "redcrit" =>
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,1,0)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,1,0)))
xx1 = "info" =>
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,2,1)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,2,1)))
messagePrint(" ")
messagePrint("WARNING: options are - redcrit and/or info - ")
messagePrint(" you didn't type them correct")
@@ -37320,11 +37320,11 @@ GroebnerPackage(Dom, Expon, VarSet, Dpol): T == C where
Pol=[] => [0]
(xx1 = "redcrit" and xx2 = "info") or
(xx1 = "info" and xx2 = "redcrit") =>
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,1,1)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,1,1)))
xx1 = "redcrit" and xx2 = "redcrit" =>
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,1,0)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,1,0)))
xx1 = "info" and xx2 = "info" =>
- minGbasis(sort( degree #1 > degree #2, gbasis(Pol,2,1)))
+ minGbasis(sort((x,y) +-> degree x > degree y, gbasis(Pol,2,1)))
messagePrint(" ")
messagePrint("WARNING: options are - redcrit and/or info - ")
messagePrint(" you didn't type them correctly")
diff --git a/changelog b/changelog
index a79a96c..ff36e74 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090603 tpd src/axiom-website/patches.html 20090603.03.tpd.patch
+20090603 tpd books/bookvol10.4 GB +-> conversion
20090603 tpd src/axiom-website/patches.html 20090603.02.tpd.patch
20090603 tpd books/bookvol10.4 GBINTERN +-> conversion
20090603 tpd src/axiom-website/patches.html 20090603.01.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index f55caea..46df7b8 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1429,5 +1429,7 @@ bookvol10.4 GOSPER +-> conversion
bookvol10.4 GBF +-> conversion
20090603.02.tpd.patch
bookvol10.4 GBINTERN +-> conversion
+20090603.02.tpd.patch
+bookvol10.4 GB +-> conversion