diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index 536df9d..942c067 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -41007,7 +41007,7 @@ IdealDecompositionPackage(vl,nv) : C == T -- take away nv, now doesn't
rearrange(vlist:List OV) :List OV ==
vlist=[] => vlist
- sort(#1>#2,setDifference(lvint,setDifference(lvint,vlist)))
+ sort((z1,z2)+->z1>z2,setDifference(lvint,setDifference(lvint,vlist)))
---- radical of a 0-dimensional ideal ----
zeroRadComp(I:FIdeal,truelist:List OV) : FIdeal ==
diff --git a/changelog b/changelog
index a88b710..461acff 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090603 tpd src/axiom-website/patches.html 20090603.05.tpd.patch
+20090603 tpd books/bookvol10.4 IDECOMP +-> conversion
20090603 tpd src/axiom-website/patches.html 20090603.04.tpd.patch
20090603 tpd books/bookvol10.4 HEUGCD +-> conversion
20090603 tpd src/axiom-website/patches.html 20090603.03.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index 824842b..02e546a 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1427,11 +1427,13 @@ bookvol10.4 INTG0 +-> conversion
bookvol10.4 GOSPER +-> conversion
20090603.01.tpd.patch
bookvol10.4 GBF +-> conversion
-20090603.02.tpd.patch
-bookvol10.4 GBINTERN +-> conversion
20090603.02.tpd.patch
-bookvol10.4 GB +-> conversion
+bookvol10.4 GBINTERN +-> conversion
20090603.03.tpd.patch
+bookvol10.4 GB +-> conversion
+20090603.04.tpd.patch
bookvol10.4 HEUGCD +-> conversion
+20090603.05.tpd.patch
+bookvol10.4 IDECOMP +-> conversion