diff --git a/books/bookvol10.3.pamphlet b/books/bookvol10.3.pamphlet
index ec2d580..803fde4 100644
--- a/books/bookvol10.3.pamphlet
+++ b/books/bookvol10.3.pamphlet
@@ -29694,7 +29694,7 @@ FiniteDivisor(F, UP, UPUP, R): Exports == Implementation where
retract(norm reduce(cd.num))@UP)
e := cd.den * denom i
divisor ideal([(b / e)::R,
- reduce map((retract(#1)@UP rem b) / e, cd.num)]$Vector(R))
+ reduce map((s:RF):RF+->(retract(s)@UP rem b)/e, cd.num)]$Vector(R))
finiteBasis d ==
if empty?(d.fbasis) then
diff --git a/changelog b/changelog
index c25b819..e745e5d 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+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
20090511 tpd books/bookvol10.2 RCFIELD +-> conversion
20090511 tpd src/axiom-website/patches.html 20090511.03.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index afbec60..d414c91 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1222,5 +1222,7 @@ bookvol10.3 EXPR +-> conversion
bookvol10.4 CHVAR +-> conversion
20090511.04.tpd.patch
bookvol10.2 RCFIELD +-> conversion
+20090511.05.tpd.patch
+bookvol10.5 FDIV +-> conversion