Jump to content

Multiplicative order: Difference between revisions

Multiplicative order (view source)

Revision as of 17:08, 21 November 2013

74 bytes removed ,  10 years ago
→‎{{header|Julia}}: updated factors() function
(→‎{{header|Julia}}: updated factors() function)
Line 548:
=={{header|Julia}}==
(Uses the <code>factors</code> function from [[Factors of an integer#Julia]].)
<lang julia>function factors(pn)
f = Array[one(typeof(p), 0n)]
nfor = one(p,e) in factor(n)
f = reduce(vcat, f, [f*p^j for j in 1:e])
while n*n < p
if p % n == 0
push!(f, n)
push!(f, div(p, n))
end
n += one(p)
end
n*nreturn length(f) == p1 &&? push![one(fn), n] : sort!(f)
return sort!(f)
end
 
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/48303"
Cookies help us deliver our services. By using our services, you agree to our use of cookies.
More information