diff --git a/scripts/textometry/measure.hs b/scripts/textometry/measure.hs
index 5f751d459fa052fe17908a0ba9819f1197fb544c..894d0d70b9848cf00f90fedf33c6903de6b734e5 100755
--- a/scripts/textometry/measure.hs
+++ b/scripts/textometry/measure.hs
@@ -25,7 +25,6 @@ instance DefaultOrdered Sizes
 instance ToNamedRecord Sizes
 
 type Result = ArticleRecord @ Sizes @ Count
---type Result = ArticleRecord @ Sizes @ Count
 
 measureIn :: FilePath -> FilePath -> ArticleRecord -> IO ()
 measureIn textRoot treeRoot article = do