diff --git a/test/chantest.hs b/test/chantest.hs
deleted file mode 100644
index 376062f..0000000
--- a/test/chantest.hs
+++ /dev/null
@@ -1,51 +0,0 @@
-import           Control.Concurrent
-import qualified EuphApi.CloseableChan as E
-
-thread1 c n = do
-  E.writeChan c n
-  thread1 c (n + 1)
-
-thread2 c = do
-  val <- E.readChan c
-  case val of
-    Just j  -> (print j) >> thread2 c
-    Nothing -> putStrLn "thread2 closed!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
-
-main1 = do
-  c <- E.newOpenChan
-  t1 <- forkIO $ thread1 c 0
-  t2 <- forkIO $ thread2 c
-  threadDelay $ 500*1000
-  E.closeChan c
-  threadDelay $ 500*1000
-
-main2 = do
-  c <- E.newOpenChan
-  forkIO $ thread2 c
-  putStrLn "Go!"
-
-  mapM_ (E.writeChan c) [1..5]
-  -- putStrLn "added some numbers"
-
-  threadDelay $ 1000*1000
-  putStrLn "first second"
-  threadDelay $ 1000*1000
-  putStrLn "second second"
-
-  mapM_ (E.writeChan c) [6..10]
-  -- putStrLn "added more numbers"
-
-  threadDelay $ 1000*1000
-  putStrLn "third second"
-  threadDelay $ 1000*1000
-  putStrLn "fourth second"
-
-  E.closeChan c
-  -- putStrLn "channel closed"
-
-  threadDelay $ 1000*1000
-  putStrLn "fifth second"
-  threadDelay $ 1000*1000
-  putStrLn "sixth second"
-
-main = main2