Changeset 058f0e3 in git for libpolys/polys/matpol.cc
- Timestamp:
- Feb 6, 2015, 1:53:03 PM (9 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- a92de381727646a5a354c1e9012a455c58b8e02a
- Parents:
- 5d0cbde5a46435543fb6098ae4b46629d3f54b87
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/matpol.cc
r5d0cbd r058f0e3 8 8 9 9 #include <stdio.h> 10 #include <string.h>11 #include <sstream>12 10 #include <math.h> 13 11 … … 758 756 } 759 757 } 760 761 void mp_Write(matrix im, const ring r)762 {763 int i,ii = MATROWS(im)-1;764 int j,jj = MATCOLS(im)-1;765 poly *pp = im->m;766 for (i=0; i<=ii; i++)767 {768 for (j=0; j<=jj; j++)769 {770 Print("matrix[%u,%u]=",i+1,j+1);771 if ((i<ii)||(j<jj)) p_Write(*pp++, r);772 else p_Write0(*pp, r);773 }774 }775 return;776 }777 778 758 779 759 char * iiStringMatrix(matrix im, int dim, const ring r, char ch)
Note: See TracChangeset
for help on using the changeset viewer.