Source position: ipf.pas line 98
function spline(
n: ArbInt;
x: Complex;
var ac: Complex;
var gammar: ArbFloat;
u1: ArbFloat;
pf: Complex
):ArbFloat;