diff --git a/Proj2.hs b/Proj2.hs index 78edaad..84c4274 100644 --- a/Proj2.hs +++ b/Proj2.hs @@ -241,7 +241,6 @@ allChords = p2 <- allPitches, p3 <- allPitches, let chord = [p1, p2, p3], - length chord == 3, p1 < p2, p2 < p3 ]