Source position: roo.pas line 33
procedure roobin(
n: ArbInt;
a: Complex;
var z: Complex;
var term: ArbInt
);