Anonymous user
Miller–Rabin primality test: Difference between revisions
m
→[[Miller-Rabin_test#ALGOL 68]]: rename clude to lude.
m (forgot the header) |
m (→[[Miller-Rabin_test#ALGOL 68]]: rename clude to lude.) |
||
Line 24:
{{trans|python}}
{{works with|ALGOL 68|Standard - with
{{works with|ALGOL 68G|Any - tested with release mk15-0.8b.fc9.i386}}
<!-- {{does not work with|ELLA ALGOL 68|Any (with appropriate job cards AND formatted transput statements removed) - tested with release 1.8.8d.fc9.i386 - ELLA has no FORMATted transput, also it generates a call to undefined C LONG externals }} -->
Line 31:
MODE POWMODSTRUCT = LINT;
PR READ "
PROC miller rabin = (LINT n, LOOPINT k)BOOL: (
Line 69:
937 941 947 953 967 971 977 983 991 997
</pre>
=={{header|Bc}}==
{{works with|GNU bc}}
|