모듈:NumberTheory
이 모듈에 대한 설명문서는 모듈:NumberTheory/설명문서에서 만들 수 있습니다
local getArgs = require('모듈:Arguments').getArgs
local p = {}
function _powerMod( root, expo, modulo )
local BaseConvert = require( '모듈:BaseConvert' );
local power = 1;
local expo2 = BaseConvert.convert({n = expo, base = 2});
local i;
for i = 1, #expo2 do
power = (power * power) % modulo;
power = power * (root ^ expo2:sub(i,i)) % modulo;
end
return power
end
function p.powerMod(frame)
local args
if frame == mw.getCurrentFrame() then
args = frame.args
else
args = frame
end
local root = args.root
local expo = args.expo
local modulo = args.modulo
return _powerMod( root, expo, modulo )
end
function _gcd(args)
gc = math.abs(args[1])
local i;
for i = 2, #args do
local a = gc + 0;
local b = math.abs(args[i]);
local c;
while c ~= 0 do
c = a % b;
a = b * 1;
b = c * 1;
end
gc = a + 0
end
return gc
end
function p.gcd(frame)
local args = getArgs(frame)
return _gcd(args)
end
return p