TEST
@@ -1,6 +1,7 @@
  testPermParser :: Permutation Parser String
  testPermParser =
-   f <$> toPermutationWithDefault 'x' (char 'a')
+   f
+     <$> toPermutationWithDefault 'x' (char 'a')
      <*> toPermutationWithDefault 'y' (char 'b')
      <*> toPermutationWithDefault 'z' (char 'c')
    where
