sequences: rename subsequence? words to subseq? again.

[factor.git] / extra / project-euler / 047 / 047.factor

diff --git a/extra/project-euler/047/047.factor b/extra/project-euler/047/047.factor
index 601682c3de636c6b1c2f6646ba628e9aec7f7210..e5e94560d6a653efbf4bbf75b2b816f253326021 100644 (file)
--- a/extra/project-euler/047/047.factor
+++ b/extra/project-euler/047/047.factor
@@ -80,7 +80,7 @@ SYMBOL: sieve
     ] each sieve get ;
 
 : consecutive-under ( limit m -- n/f )
-   [ prime-tau-upto ] [ dup <repetition> ] bi* subsequence-starts ;
+   [ prime-tau-upto ] [ dup <repetition> ] bi* subseq-index ;
 
 PRIVATE>