2 files changed, 0 insertions, 35 deletions
diff --git a/iterative-add/iterative-add-test.scm b/iterative-add/iterative-add-test.scm
deleted file mode 100644
index d318570..0000000
--- a/iterative-add/iterative-add-test.scm
+++ /dev/null
@@ -1,20 +0,0 @@
-;; -*- compile-command: "guile -L . iterative-add-test.scm"; -*-
-(use-modules (srfi srfi-64)
-	     (iterative-add))
-
-
-(test-begin "harness")
-
-(test-equal "add 0 to 1"
-  1
-  (iterative-add-generator 1))
-
-(test-equal "add 1 to 2"
-  3
-  (iterative-add-generator 2))
-
-(test-equal "add 2 to 6"
-  8
-  (iterative-add-generator 6))
-
-(test-end "harness")
diff --git a/iterative-add/iterative-add.scm b/iterative-add/iterative-add.scm
deleted file mode 100644
index 45c6cf9..0000000
--- a/iterative-add/iterative-add.scm
+++ /dev/null
@@ -1,15 +0,0 @@
-(define-module (iterative-add)
-  #:export (iterative-add-generator))
-
-(define iterative-add
-  (let ((prev-num 0))
-    (lambda (num)
-      (let ((result
-	     (+ num prev-num)))
-	(set! prev-num num)
-	result))))
-
-(define (iterative-add-generator num)
-  "Adds the previously received
-number to the current one."
-  (iterative-add num))