Slice from a matrix?

[Harald Schmidt <harald.schmidt@anobject.net>]

Hi,

I got a generic matrix / vector package like this:

Generic
    rows : positive;
    cols : positive;
    item_type is digits <>;
Package matrix is
    type vector_type is array (positive range <>) of item_type;
    type matrix_type is array (positive range <>,
                               positive range <>) of item_type;
    subtype col_vector is vector_type(1..cols);
    subtype row_vector is vector_type(1..rows);
    subtype matrix is matrix_type(1..rows, 1..cols);
...
End matrix;

Then I have three Put procedures, one for matrix, one for row_vector, and
one for col_vector.

My question is how to get a slice from a matrix which I can convert to a
col_vector which does the printing?

Things like...

    PUT (col_vector(M (1, 1..3)));

doesn't work.

I don't want to copy code for the printing routines.

Thanks for any help,

Harald