Update

thiele.lisp

@@ -52,6 +52,17 @@
 ; (%i3) keepfloat:true$
 ; (%i4) subst(x=0.5, thiele(b,a))*3;
 ; (%o4)                         3.14159265357928
+;
+;    The function may be used with exact values, but it is highly sensitive
+;    to input values, and equally spaced abscissæ often yield some division
+;    by zero error.
+;
+; (%i5) thiele([1,2,5,6], [10,12,11,13]);
+;                                   2
+;                                9 x  + 29 x - 238
+; (%o5)                          -----------------
+;                                    8 x - 28
+
 
 (defun $thiele (u v)
   (loop for rh on