Home primes: Difference between revisions
m
→{{header|Factor}}: tweak output
(Add Factor) |
m (→{{header|Factor}}: tweak output) |
||
Line 56:
: chain. ( n -- )
chain [ last ] [ ] bi unclip "HP%
[ 1 + "HP%d(%d) = " printf ] each-index . ;
Line 62:
{{out}}
<pre>
HP10 = HP25(1) = HP55(2) = HP511(3) = HP773(4) = 773
HP11 = 11
|