Square form factorization: Difference between revisions

m
→‎{{header|REXX}}: changed a comment.
m (→‎{{header|REXX}}: added where this code used as a basis.)
m (→‎{{header|REXX}}: changed a comment.)
Line 746:
QQ= qprev + b * (pprev - p)
qprev= q
end /*foreveruntil*/
r= gcd(n, qprev)
if r\==1 then if r\==n then return r