diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index 9da1de8..90d30e1 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -6005,7 +6005,7 @@ CharacteristicPolynomialInMonogenicalAlgebra(R : CommutativeRing,
Pol ==> SparseUnivariatePolynomial
import UnivariatePolynomialCategoryFunctions2(R, PolR, PolR, Pol(PolR))
- XtoY(Q : PolR) : Pol(PolR) == map(monomial(#1, 0), Q)
+ XtoY(Q : PolR) : Pol(PolR) == map(x+->monomial(x, 0), Q)
P : Pol(PolR) := XtoY(definingPolynomial()$E)
X : Pol(PolR) := monomial(monomial(1, 1)$PolR, 0)
diff --git a/changelog b/changelog
index e745e5d..ba1a901 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090511 tpd src/axiom-website/patches.html 20090511.06.tpd.patch
+20090511 tpd books/bookvol10.4 CPIMA +-> conversion
20090511 tpd src/axiom-website/patches.html 20090511.05.tpd.patch
20090511 tpd books/bookvol10.3 FDIV +-> conversion
20090511 tpd src/axiom-website/patches.html 20090511.04.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index d414c91..11ef29f 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1223,6 +1223,8 @@ bookvol10.4 CHVAR +-> conversion
20090511.04.tpd.patch
bookvol10.2 RCFIELD +-> conversion
20090511.05.tpd.patch
-bookvol10.5 FDIV +-> conversion
+bookvol10.3 FDIV +-> conversion
+20090511.06.tpd.patch
+bookvol10.4 CPIMA +-> conversion