Cycle detection: Difference between revisions

Content added Content deleted
Line 470: Line 470:
drop ;
drop ;


: f(x) dup * 1 + 255 mod ;
: f(x) dup * 1+ 255 mod ;


3 ' f(x) find-cycle
3 ' f(x) find-cycle
Line 482: Line 482:
The cycle is 101 2 5 26 167 95
The cycle is 101 2 5 26 167 95
</pre>
</pre>

=={{header|FreeBASIC}}==
=={{header|FreeBASIC}}==
===Brent's algorithm===
===Brent's algorithm===