int kdmatrix_identity( int rows, int cols, double *matrix)
none
$BOOTSTRAP/objects/library/klibm/src/dmatrix.c