RosettaCodeData/Task/List-comprehensions/Wrapl/list-comprehensions.wrapl
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

1 line
84 B
Text

ALL WITH x <- 1:to(n), y <- x:to(n), z <- y:to(n) DO (x^2 + y^2 = z^2) & [x, y, z];