|
@@ -88,7 +88,7 @@ procedure ipfish(hst: THermiteSplineType; n: ArbInt; var x, y, d1s: ArbFloat; va
|
|
|
}
|
|
|
function ipfsph(n: ArbInt; var x, y, d1s: ArbFloat; t: ArbFloat; var term: ArbInt): ArbFloat;
|
|
|
|
|
|
-{Calculate n-degree polynomal b for dataset (x,y) with n elements
|
|
|
+{Calculate n-degree polynomal b for dataset (x,y) with m elements
|
|
|
using the least squares method.}
|
|
|
procedure ipfpol(m, n: ArbInt; var x, y, b: ArbFloat; var term: ArbInt);
|
|
|
|