From 1a8c81d07efe55c5a6909aff32359d4b8866af1c Mon Sep 17 00:00:00 2001 From: Elizabeth Hunt Date: Wed, 27 Sep 2023 09:53:37 -0600 Subject: keep unit tests but make directory structure more consistent with requirements i did not read --- cl/src/approx/maceps.lisp | 11 ----------- 1 file changed, 11 deletions(-) delete mode 100644 cl/src/approx/maceps.lisp (limited to 'cl/src/approx/maceps.lisp') diff --git a/cl/src/approx/maceps.lisp b/cl/src/approx/maceps.lisp deleted file mode 100644 index ad234e8..0000000 --- a/cl/src/approx/maceps.lisp +++ /dev/null @@ -1,11 +0,0 @@ -(in-package :lizfcm.approx) - -(defun compute-maceps (f a init) - (let ((h init) - (err init)) - (loop while (> err 0) - do - (setf h (/ h 2) - err (abs (- (funcall f (+ a h)) - (funcall f a)))) - collect (list a h err)))) -- cgit v1.3