#include "mat.h"

/*
 * zero: returns arg2 zero filled
 */

int zero(MATRIX *a)
{
    register int i, j;

    for (i = 0; i < a->nrows; i++)
        for (j = 0; j < a->ncols; j++)
            a->x[i][j] = 0.0;

    return 1;
}
