diff --git a/afl/tests/test-afl-at-exp-racket.rkt b/afl/tests/test-afl-at-exp-racket.rkt
deleted file mode 100644
index ed5576b..0000000
--- a/afl/tests/test-afl-at-exp-racket.rkt
+++ /dev/null
@@ -1,21 +0,0 @@
-#lang afl at-exp racket/base
-(require rackunit)
-(check-equal? (map #λ(+ % 1) '(1 2 3))
-              '(2 3 4))
-(check-equal? (map #λ(+ % %2) '(1 2 3) '(1 2 3))
-              '(2 4 6))
-(check-equal? (#λ(apply list* % %&) 1 '(2 3))
-              '(1 2 3))
-(check-equal? (#λ(* 1/2 %#:m (* %#:v %#:v)) #:m 2 #:v 1)
-              1)
-(check-equal? (let ([x (#λ"I am x")])
-                (#λx))
-              "I am x")
-(check-equal? (#λ(begin (set! % "%") %1) "%1")
-              "%")
-(check-equal? (map #λ@+[% 1] '(1 2 3))
-              '(2 3 4))
-(check-equal? @#λ(+ % 1)[1] 
-              2)
-(check-equal? @#λ@+[% 1][1]
-              2)
\ No newline at end of file
diff --git a/afl/tests/test-afl-scribble.rkt b/afl/tests/test-afl-scribble.rkt
deleted file mode 100644
index 521aae0..0000000
--- a/afl/tests/test-afl-scribble.rkt
+++ /dev/null
@@ -1,27 +0,0 @@
-#lang afl scribble/base
-@(require rackunit)
-@(check-equal? @#λ@title{@%}{This is a Title}
-              @title{This is a Title})
-#λ
-@(check-equal? (map #λ(+ % 1) '(1 2 3))
-               '(2 3 4))
-@(check-equal? (map #λ(+ % %2) '(1 2 3) '(1 2 3))
-               '(2 4 6))
-@(check-equal? (#λ(apply list* % %&) 1 '(2 3))
-               '(1 2 3))
-@(check-equal? (#λ(* 1/2 %#:m (* %#:v %#:v)) #:m 2 #:v 1)
-               1)
-@(check-equal? (let ([x (#λ"I am x")])
-                 (#λx))
-               "I am x")
-@(check-equal? (#λ(begin (set! % "%") %1) "%1")
-               "%")
-@(check-equal? (map #λ@+[% 1] '(1 2 3))
-               '(2 3 4))
-@(check-equal? @#λ(+ % 1)[1] 
-               2)
-@(check-equal? @#λ@+[% 1][1]
-               2)
-@(check-equal? @#λ%{#λ}
-               "#λ")
-#λ
\ No newline at end of file