16 lines
453 B
Plaintext
16 lines
453 B
Plaintext
function ToString(x as *BigInteger) {
|
|
with x,"toString" as ret
|
|
=ret
|
|
}
|
|
Function PowerTen(x as integer) {
|
|
a=Biginteger("10")
|
|
method a, "intPower", biginteger(str$(x,"")) as a
|
|
=a
|
|
}
|
|
a=bigInteger("2988348162058574136915891421498819466320163312926952423791023078876139")
|
|
b=biginteger("2351399303373464486466122544523690094744975233415544072992656881240319")
|
|
profiler
|
|
method a, "modpow", b, PowerTen(40) as result
|
|
print timecount
|
|
Print ToString(result)
|