DIAG: rm unused parameter

This commit is contained in:
hasufell 2014-11-16 17:25:58 +01:00
parent ea88ef84ea
commit 8d7ed598e2
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020

View File

@ -157,7 +157,7 @@ convexHLs = Diag chl
convexHStepsLs :: Diag convexHStepsLs :: Diag
convexHStepsLs = GifDiag chs convexHStepsLs = GifDiag chs
where where
chs p col f vt = chs _ col f vt =
fmap mkChDiag (f vt) fmap mkChDiag (f vt)
where where
mkChDiag vt' = mkChDiag vt' =