static char *sccsid = "@(#)m_dump.c	4/6/82 (U of Maryland, FLB)";

#include "mat.h"

struct matrix *
m_dump(mat)
register struct matrix *mat;
{
register int row, col;

printf("%d X %d\n", mat->m_rows, mat->m_cols);

for (row = 0; row < mat->m_rows; row++) {
	for (col = 0; col < mat->m_cols; col++)
		printf("%f, ", m_v(mat, row, col));
	putchar('\n');
	}
}
                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        