Clean up the codeHEADmaster

3 files changed, 3 insertions, 7 deletions

diff --git a/src/A.hs b/src/A.hs
index 3b994e1..629a6fd 100644
--- a/src/A.hs
+++ b/src/A.hs
@@ -1,9 +1,8 @@
 module A where
 
 import Language.Haskell.TH
-
 import F
 
 
-kaas :: Exp
-kaas = LitE (StringL "kaas")
+foo :: Exp
+foo = LitE (StringL "foo")
diff --git a/src/B.hs b/src/B.hs
index 1b88325..35f1127 100644
--- a/src/B.hs
+++ b/src/B.hs
@@ -3,6 +3,4 @@ module B where
 
 import A
 
-
--- $([d| foo = $(LitE . StringL . show . isRelevant <$> [t| Ranked 4 Double |]) |])
-$([d| foo = $(return $ kaas) |])
+$([d| bar = $(return foo) |])
diff --git a/src/F.hs b/src/F.hs
index 911a3db..7268cfa 100644
--- a/src/F.hs
+++ b/src/F.hs
@@ -1,5 +1,4 @@
 {-# LANGUAGE ForeignFunctionInterface #-}
 module F where
 
-
 foreign import ccall "some_c_function" c_some_c_function :: IO ()