git-svn-id: trunk@35689 -
@@ -24,7 +24,7 @@ Unit int;
interface
-uses typ;
+uses typ,math;
Var
limit : ArbInt;
@@ -23,7 +23,7 @@ unit spl;
-uses typ, sle;
+uses typ, math, sle;
function spl1bspv(q: ArbInt; var kmin1, c1: ArbFloat; x: ArbFloat; var term: ArbInt): ArbFloat;
function spl2bspv(qx, qy: ArbInt; var kxmin1, kymin1, c11: ArbFloat; x, y: ArbFloat; var term: ArbInt): ArbFloat;