2 files changed, 0 insertions, 29 deletions
diff --git a/Biz/Bild/Bessel.c b/Biz/Bild/Bessel.c
deleted file mode 100644
index 52b4dee..0000000
--- a/Biz/Bild/Bessel.c
+++ /dev/null
@@ -1,19 +0,0 @@
-// : dep guile-3.0
-// : lib libbessel-guile
-// : arg -shared
-// : arg -fPIC
-
-#include <math.h>
-#include <libguile.h>
-
-SCM
-j0_wrapper (SCM x)
-{
-  return scm_from_double (j0 (scm_to_double (x)));
-}
-
-void
-init_bessel ()
-{
-  scm_c_define_gsubr ("j0", 1, 0, 0, j0_wrapper);
-}
diff --git a/Biz/Bild/Bessel.scm b/Biz/Bild/Bessel.scm
deleted file mode 100644
index ad40834..0000000
--- a/Biz/Bild/Bessel.scm
+++ /dev/null
@@ -1,10 +0,0 @@
-;; : out bessel.exe
-(import (only (rnrs base) assert))
-(load-extension "libguile-bessel" "init_bessel")
-(define (main args)
-  (let ((result (j0 2)))
-    (display "testing")
-    (newline)
-    (display result)
-    (newline)
-    (assert (= (j0 2) 0.22389077914123567))))