set_namespace(rosettacode);

add_mat(myMatrix)_row(a,b,c)_row(A,B,C)_row(1,2,3);
add_var(output,columnArray);

with_mat(myMatrix)_foreach()_bycol()_var(columnArray)
    with_var(output)_append()_flat([columnArray])_append(\n);
;

me_msg([output]);

reset_namespace[];