diff --git a/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs b/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs
index cea6bfb..544326b 100644
--- a/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs
+++ b/haskell-experiments/test/Test/Datalog/NaiveDatabaseSpec.hs
@@ -45,8 +45,9 @@ spec = do
               [ "parent(\"alice\", \"bob\")."
               , "parent(\"bob\", \"carol\")."
               ]
-              [ "ancestor(X,Y) :- parent(X,Y)."
-              , "ancestor(X,Y) :- parent(X,Z), ancestor(Z,Y)."
+              [
+                "ancestor(X,Y) :- parent(X,Z), ancestor(Z,Y)."
+              , "ancestor(X,Y) :- parent(X,Y)." 
               ]
           parentRelation =
             Relation