Source position: upolynom.pas line 19
function RFrac(
X: Float;
Coef: TVector;
Deg1: Integer;
Deg2: Integer
):Float;