Ludic numbers: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) m (→opApply Version: Fix link: Perl 6 --> Raku) |
SqrtNegInf (talk | contribs) m (→{{header|Pascal}}: Fix comment: Perl 6 --> Raku) |
||
| Line 2,377: | Line 2,377: | ||
=={{header|Pascal}}== |
=={{header|Pascal}}== |
||
=== === |
=== === |
||
Inspired by "rotors" of |
Inspired by "rotors" of Raku. |
||
Runtime nearly quadratic: maxLudicCnt = 10000 -> 0.03 s =>maxLudicCnt= 100000 -> 3 s |
Runtime nearly quadratic: maxLudicCnt = 10000 -> 0.03 s =>maxLudicCnt= 100000 -> 3 s |
||
<lang pascal>program lucid; |
<lang pascal>program lucid; |
||