diff --git a/contrib/lazy-lists/lists.facts b/contrib/lazy-lists/lists.facts
index 83582e2f78..69bf9697b9 100644
--- a/contrib/lazy-lists/lists.facts
+++ b/contrib/lazy-lists/lists.facts
@@ -182,7 +182,7 @@ HELP: lcomp*
 { $values { "list" "a list of lists" } { "guards" "a sequence of quotations with stack effect ( seq -- bool )" } { "quot" "a quotation with stack effect ( seq -- X )" } { "list" "the resulting list" } }
 { $description "Get the cartesian product of the lists in 'list', filter it by applying each guard quotation to it and call 'quot' call with each element from the remaining cartesian product items on the stack, the result of which is returned in the final 'list'." } 
 { $examples
-  { $example "{ 1 2 3 } seq>list { 4 5 6 } seq>list 2list { [ first odd? ] } [ + ] lcomp*" }
+  { $example "{ 1 2 3 } >list { 4 5 6 } >list 2list { [ first odd? ] } [ first2 + ] lcomp*" }
 }
 { $see-also leach lmap lmap-with lconcat ltake lsubset lfrom-by lcartesian-product lcomp } ;