You might also like to try the slightly more efficient...

pyth n = [(a,b,c) | a <- [1..n],      
                    b <- [a..n],       
                    c <- [a+1..n],     
                    a*a + b*b == c*c ]


Greg Buchholz

_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to