Changeset 058f0e3 in git
- Timestamp:
- Feb 6, 2015, 1:53:03 PM (9 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- a92de381727646a5a354c1e9012a455c58b8e02a
- Parents:
- 5d0cbde5a46435543fb6098ae4b46629d3f54b87
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/ideals.cc
r5d0cbd r058f0e3 2659 2659 omFreeSize((ADDRESS)(id_sort), idsize*sizeof(poly_sort)); 2660 2660 } 2661 2662 void id_Write(ideal id, ring r)2663 {2664 for (int i=0; i<idSize(id); i++)2665 p_Write(id->m[i], r, r);2666 } -
kernel/ideals.h
r5d0cbd r058f0e3 209 209 ideal id_TensorModuleMult(const int m, const ideal M, const ring rRing); // image of certain map for BGG 210 210 211 void id_Write(ideal id, ring r);212 211 213 212 #endif -
libpolys/coeffs/coeffs.h
r5d0cbd r058f0e3 218 218 // unbound name of the special element. 219 219 const char * (*cfRead)(const char * s, number * a, const coeffs r); 220 220 221 void (*cfNormalize)(number &a, const coeffs r); 222 221 223 BOOLEAN (*cfGreater)(number a,number b, const coeffs r), 222 224 /// tests … … 607 609 608 610 /// return the quotient of 'a' and 'b', i.e., a/b; 609 /// raise an error if 'b' is not invertible in r611 /// raises an error if 'b' is not invertible in r 610 612 /// exception in Z: raises an error if 'a' is not divisible by 'b' 611 613 static FORCE_INLINE number n_Div(number a, number b, const coeffs r) … … 659 661 return sum; 660 662 } 663 661 664 662 665 /// return the difference of 'a' and 'b', i.e., a-b -
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) -
libpolys/polys/matpol.h
r5d0cbd r058f0e3 91 91 char * iiStringMatrix(matrix im, int dim, const ring r, char ch=','); 92 92 93 void mp_Write(matrix im, const ring r);94 95 93 extern omBin ip_smatrix_bin; 96 94
Note: See TracChangeset
for help on using the changeset viewer.