Anonymous user
Miller–Rabin primality test: Difference between revisions
→{{header|Erlang_Fortran}}
Walterpachl (talk | contribs) m (→{{header|REXX}}: minor corrections) |
|||
Line 910:
println()</lang>
=={{header|
Line 1,005:
Acc;
power(B, E, Acc) ->
power(B, E - 1, B * Acc).</lang>
Line 1,015:
{{works with|Fortran|95}}
For the module ''PrimeDecompose'', see [[Prime decomposition#Fortran|Prime decomposition]].
<lang fortran>
module Miller_Rabin
use PrimeDecompose
implicit none
| |||