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