Curzon numbers: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Line 489:
[ temp take
over join
temp put ] is dax ( [ --> )
 
[ 2dup ** 1+
Line 500:
1
[] temp put
[ 2dup curzon if dax
[ temp take
over join
temp put ]
temp share
size 1000 < while
Retrieved from "https://rosettacode.org/wiki/Curzon_numbers"