Changeset 058f0e3 in git


Ignore:
Timestamp:
Feb 6, 2015, 1:53:03 PM (9 years ago)
Author:
Yue Ren <ren@…>
Branches:
(u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
Children:
a92de381727646a5a354c1e9012a455c58b8e02a
Parents:
5d0cbde5a46435543fb6098ae4b46629d3f54b87
Message:
chg: cleanup, removed unwanted changes
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • kernel/ideals.cc

    r5d0cbd r058f0e3  
    26592659  omFreeSize((ADDRESS)(id_sort), idsize*sizeof(poly_sort));
    26602660}
    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  
    209209ideal id_TensorModuleMult(const int m, const ideal M, const ring rRing); // image of certain map for BGG
    210210
    211 void id_Write(ideal id, ring r);
    212211
    213212#endif
  • libpolys/coeffs/coeffs.h

    r5d0cbd r058f0e3  
    218218   // unbound name of the special element.
    219219   const char *  (*cfRead)(const char * s, number * a, const coeffs r);
     220
    220221   void    (*cfNormalize)(number &a, const coeffs r);
     222
    221223   BOOLEAN (*cfGreater)(number a,number b, const coeffs r),
    222224            /// tests
     
    607609
    608610/// return the quotient of 'a' and 'b', i.e., a/b;
    609 /// raise an error if 'b' is not invertible in r
     611/// raises an error if 'b' is not invertible in r
    610612/// exception in Z: raises an error if 'a' is not divisible by 'b'
    611613static FORCE_INLINE number n_Div(number a, number b, const coeffs r)
     
    659661 return sum;
    660662}
     663
    661664
    662665/// return the difference of 'a' and 'b', i.e., a-b
  • libpolys/polys/matpol.cc

    r5d0cbd r058f0e3  
    88
    99#include <stdio.h>
    10 #include <string.h>
    11 #include <sstream>
    1210#include <math.h>
    1311
     
    758756  }
    759757}
    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 
    778758
    779759char * iiStringMatrix(matrix im, int dim, const ring r, char ch)
  • libpolys/polys/matpol.h

    r5d0cbd r058f0e3  
    9191char * iiStringMatrix(matrix im, int dim, const ring r, char ch=',');
    9292
    93 void mp_Write(matrix im, const ring r);
    94 
    9593extern omBin ip_smatrix_bin;
    9694
Note: See TracChangeset for help on using the changeset viewer.