모듈: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( x, y )
if ( x == nil or y == nil) then
return x
elseif ( x == math.floor(x) and y == math.floor(y) ) then
local a = math.abs(x);
local b = math.abs(y);
local c;
while c ~= 0 do
c = a % b;
a = b;
b = c;
end
return a
else return x
end
end
function p.gcd(frame)
local args = getArgs(frame)
local i = 1
local gc = args[1]
while args[i] ~= nil do
i = i + 1
gc = _gcd( gc, args[i] )
end
return gc
end
return p