diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index 2a096c0..b6f908a 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -119804,7 +119804,8 @@ PartialFractionPackage(R): Cat == Capsule where
makeSup(p:Polynomial R, v:Symbol) : SparseUnivariatePolynomial FPR ==
up := univariate(p,v)
- map(#1::FPR,up)$UnivariatePolynomialCategoryFunctions2(PR, SUP PR, FPR, SUP FPR)
+ map((z1:PR):FPR +-> z1::FPR,up)_
+ $UnivariatePolynomialCategoryFunctions2(PR, SUP PR, FPR, SUP FPR)
partialFraction(p, facq, v) ==
up := UnivariatePolynomial(v, Fraction Polynomial R)
diff --git a/changelog b/changelog
index 1e9b8dc..77d1768 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090609 tpd src/axiom-website/patches.html 20090609.07.tpd.patch
+20090609 tpd books/bookvol10.4 PFRPAC +-> conversion
20090609 tpd src/axiom-website/patches.html 20090609.06.tpd.patch
20090609 tpd books/bookvol10.4 PLEQN +-> conversion
20090609 tpd src/axiom-website/patches.html 20090609.05.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index 21551ad..0f3c205 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1525,5 +1525,7 @@ bookvol10.4 ODETOOLS +-> conversion
bookvol10.4 PWFFINTB +-> conversion
20090609.06.tpd.patch
bookvol10.4 PLEQN +-> conversion
+20090609.07.tpd.patch
+bookvol10.4 PFRPAC +-> conversion