diff --git a/books/bookvol10.3.pamphlet b/books/bookvol10.3.pamphlet
index d48ae94..fe6d5c5 100644
--- a/books/bookvol10.3.pamphlet
+++ b/books/bookvol10.3.pamphlet
@@ -987,10 +987,10 @@ AlgebraicFunctionField(F, UP, UPUP, modulus): Exports == Impl where
getInfBasis() ==
x := inv(monomial(1, 1)$UP :: RF)
- invmod := map(#1 x, modulus)
+ invmod := map(s +-> s(x), modulus)
r := mkIntegral invmod
degree(r.poly) ^= n => error "Should not happen"
- ninvmod:UP2 := map(retract(#1)@UP, r.poly)
+ ninvmod:UP2 := map(s +-> retract(s)@UP, r.poly)
alpha := [(r.coef ** i) x for i in 0..n1]$Vector(RF)
invalpha := [inv qelt(alpha, i)
for i in minIndex alpha .. maxIndex alpha]$Vector(RF)
diff --git a/changelog b/changelog
index 256f1de..ca87da4 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090508 tpd src/axiom-website/patches.html 20090508.06.tpd.patch
+20090508 tpd books/bookvol10.3 ALGFF +-> conversion
20090508 tpd src/axiom-website/patches.html 20090508.05.tpd.patch
20090508 tpd books/bookvol10.2 FEVALAB +-> conversion
20090508 tpd src/axiom-website/patches.html 20090508.04.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index fe98d09..812316b 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1124,5 +1124,7 @@ bookvol10.2 HOAGG +-> conversion
bookvol10.4 AF +-> conversion
20090508.05.tpd.patch
bookvol10.2 FEVALAB +-> conversion
+20090508.06.tpd.patch
+bookvol10.3 ALGFF +-> conversion