(* Cartesian product of two vectors *)
DEF Cart AS distr | EACH distl END;

