diff --git a/8-a.hs b/8-a.hs
index 594cb3f..c55f6dc 100644
--- a/8-a.hs
+++ b/8-a.hs
@@ -1,5 +1,4 @@
 {-# LANGUAGE TupleSections #-}
-
 import Data.List
 
 -- this is literally only a function because read is stupid
diff --git a/8-b.hs b/8-b.hs
index 5fe69dd..bfcc6fe 100644
--- a/8-b.hs
+++ b/8-b.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE TupleSections #-}
 import Data.List
 
+-- this is literally only a function because read is stupid
 parse :: String -> [[Int]]
 parse = map (map (read . singleton)) . lines