RosettaCodeData/Task/List-comprehensions/Transd/list-comprehensions-2.transd
2023-07-01 13:44:08 -04:00

4 lines
112 B
Text

(with v (for x in Range(10)
where (mod x 2)
project Vector<ULong>([x,(* x x)]))
(textout v))