Source position: upolutil.pas line 12
function SetRealRoots(
Deg: Integer;
Z: TCompVector;
Tol: Float
):Integer;