Smarandache-Wellin primes: Difference between revisions

Content added Content deleted
(added RPL)
m (→‎{{header|RPL}}: streched to the first 4 examples)
Line 1,024: Line 1,024:
« 0 → idx
« 0 → idx
« { }
« { }
'''WHILE''' DUP SIZE 3 < '''REPEAT'''
'''WHILE''' DUP SIZE 4 < '''REPEAT'''
'''IF''' 'idx' INCR <span style="color:blue">→SW</span> DUP ISPRIME? '''THEN''' + '''ELSE''' DROP '''END'''
'''IF''' 'idx' INCR <span style="color:blue">→SW</span> DUP ISPRIME? '''THEN''' + '''ELSE''' DROP '''END'''
'''END'''
'''END'''
Line 1,031: Line 1,031:
« 0 → idx
« 0 → idx
« { }
« { }
'''WHILE''' DUP SIZE 3 < '''REPEAT'''
'''WHILE''' DUP SIZE 4 < '''REPEAT'''
'''IF''' 'idx' INCR <span style="color:blue">→SW DSW</span> DUP ISPRIME? '''THEN''' + '''ELSE''' DROP '''END'''
'''IF''' 'idx' INCR <span style="color:blue">→SW DSW</span> DUP ISPRIME? '''THEN''' + '''ELSE''' DROP '''END'''
'''END'''
'''END'''
Line 1,037: Line 1,037:
{{out}}
{{out}}
<pre>
<pre>
2: { 2 23 2357 2357111317192329313741434753596167717379838997101103107109113127131137139149151157163167173179181191193197199211223227229233239241251257263269271277281283293307311313317331337347349353359367373379383389397401409419421431433439443449457461463467479487491499503509521523541547557563569571577587593599601607613617619631641643647653659661673677683691701709719 }
2: { 2 23 2357 }
1: { 4194123321127 547233879626521 547233979727521 }
1: { 4194123321127 547233879626521 547233979727521 13672766322929571043 }
</pre>
</pre>