Source position: numlib.pas line 102
procedure rooqua(
p: ArbFloat;
q: ArbFloat;
var z1: Complex;
var z2: Complex
);