Additive primes: Difference between revisions
Content added Content deleted
Langurmonkey (talk | contribs) |
Langurmonkey (talk | contribs) |
||
| Line 2,361: | Line 2,361: | ||
=={{header|langur}}== |
=={{header|langur}}== |
||
<syntaxhighlight lang="langur">val .isPrime = fn(.i) .i == 2 or .i > 2 and |
<syntaxhighlight lang="langur">val .isPrime = fn(.i) .i == 2 or .i > 2 and |
||
not any fn(.x) .i div .x, pseries 2 .. .i ^/ 2 |
|||
val .sumDigits = fn(.i) fold |
val .sumDigits = fn(.i) fold fn{+}, s2n string .i |
||
writeln "Additive primes less than 500:" |
writeln "Additive primes less than 500:" |
||