RosettaCodeData/Task/Modular-exponentiation/Maple/modular-exponentiation.maple

a := 2988348162058574136915891421498819466320163312926952423791023078876139:
b := 2351399303373464486466122544523690094744975233415544072992656881240319:
a &^ b mod 10^40;