diff --git a/books/bookvol10.4.pamphlet b/books/bookvol10.4.pamphlet
index ca81f0b..558e376 100644
--- a/books/bookvol10.4.pamphlet
+++ b/books/bookvol10.4.pamphlet
@@ -10075,7 +10075,7 @@ CycleIndicators: Exports == Implementation where
       prod := _*/[fn2 i for i in (degree spol)::L(I)]
       lc * prod + evspol(fn2,reductum spol)
  
-    wreath(spol1,spol2) == evspol(mtpol(#1,spol2),spol1)
+    wreath(spol1,spol2) == evspol(x+->mtpol(x,spol2),spol1)
  
     hh: I -> SPOL RN      --symmetric group
     hh n == if n=0 then 1 else if n<0 then 0 else h n
diff --git a/changelog b/changelog
index cf43fc5..501e197 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+20090513 tpd src/axiom-website/patches.html 20090513.08.tpd.patch
+20090513 tpd books/bookvol10.4 CYCLES +-> conversion
 20090513 tpd src/axiom-website/patches.html 20090513.07.tpd.patch
 20090513 tpd books/bookvol10.4 CRAPACK +-> conversion
 20090513 tpd src/axiom-website/patches.html 20090513.06.tpd.patch
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index 92a91a1..3482361 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -1286,5 +1286,7 @@ bookvol10.4 COORDSYS +-> conversion<br/>
 bookvol10.3 MOEBIUS +-> conversion<br/>
 <a href="patches/20090513.07.tpd.patch">20090513.07.tpd.patch</a>
 bookvol10.4 CRAPACK +-> conversion<br/>
+<a href="patches/20090513.08.tpd.patch">20090513.08.tpd.patch</a>
+bookvol10.4 CYCLES +-> conversion<br/>
  </body>
 </html>