mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-26 06:48:04 +02:00
6 lines
190 B
Haskell
6 lines
190 B
Haskell
|
triples :: [(Integer, Integer, Integer)]
|
||
|
|
triples = [(x,y,z) | z <-[1..],
|
||
|
|
x <- [1..z],
|
||
|
|
y <- [1..z],
|
||
|
|
z^2 == x^2 + y^2
|
||
|
|
]
|