Changeset 0f43c5 in git


Ignore:
Timestamp:
Nov 3, 2015, 4:30:32 PM (8 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '82fc009ea2b0098c1a4896c841bb70860976bdfc')
Children:
08fd464d5e4df1154e463c07e5e6ba3e86a18200
Parents:
f0a16b695061835db505a6c6d8ebab70b4c34304
Message:
opt: avoid module==module/ideal==ideal, removed idTransp, ...
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • Singular/iparith.cc

    rf0a16b r0f43c5  
    44324432{
    44334433  ideal id = (ideal)a->Data();
    4434   id = idTransp(id);
     4434  id = id_Transp(id,currRing);
    44354435  int W = IDELEMS(id);
    44364436
     
    54545454static BOOLEAN jjidTransp(leftv res, leftv v)
    54555455{
    5456   res->data = (char *)idTransp((ideal)v->Data());
     5456  res->data = (char *)id_Transp((ideal)v->Data(),currRing);
    54575457  return FALSE;
    54585458}
  • Singular/ipshell.cc

    rf0a16b r0f43c5  
    28252825      syzstr->minres = minres;
    28262826  }
    2827 
    28282827  return li;
    2829 
    2830 
    28312828}
    28322829
  • Singular/table.h

    rf0a16b r0f43c5  
    455455,{D(jjCOMPARE_BIM),EQUAL_EQUAL,   INT_CMD,        CMATRIX_CMD, CMATRIX_CMD, ALLOW_PLURAL | ALLOW_RING}
    456456#endif
    457 ,{D(jjEQUAL_Ma),  EQUAL_EQUAL,    INT_CMD,        MATRIX_CMD, MATRIX_CMD, ALLOW_PLURAL | ALLOW_RING}
    458457,{  jjWRONG2 ,    EQUAL_EQUAL,    0,              IDEAL_CMD,  IDEAL_CMD, ALLOW_PLURAL | ALLOW_RING}
    459458,{  jjWRONG2 ,    EQUAL_EQUAL,    0,              MODUL_CMD,  MODUL_CMD, ALLOW_PLURAL | ALLOW_RING}
    460459,{  jjWRONG2 ,    EQUAL_EQUAL,    0,              IDEAL_CMD,  MODUL_CMD, ALLOW_PLURAL | ALLOW_RING}
    461460,{  jjWRONG2 ,    EQUAL_EQUAL,    0,              MODUL_CMD,  IDEAL_CMD, ALLOW_PLURAL | ALLOW_RING}
     461,{D(jjEQUAL_Ma),  EQUAL_EQUAL,    INT_CMD,        MATRIX_CMD, MATRIX_CMD, ALLOW_PLURAL | ALLOW_RING}
    462462,{D(jjEQUAL_I),   NOTEQUAL,       INT_CMD,        INT_CMD,    INT_CMD, ALLOW_PLURAL | ALLOW_RING}
    463463,{D(jjEQUAL_BI),  NOTEQUAL,       INT_CMD,        BIGINT_CMD, BIGINT_CMD, ALLOW_PLURAL | ALLOW_RING}
     
    631631,{D(jjREDUCE_ID), REDUCE_CMD,     MODUL_CMD,      MODUL_CMD,  IDEAL_CMD, ALLOW_PLURAL |ALLOW_RING}
    632632,{D(jjREDUCE_ID), REDUCE_CMD,     MODUL_CMD,      MODUL_CMD,  MODUL_CMD, ALLOW_PLURAL |ALLOW_RING}
    633 //,{D(jjRES),       RES_CMD,        LIST_CMD,       IDEAL_CMD,  INT_CMD, NO_PLURAL |ALLOW_RING}
    634 //,{D(jjRES),       RES_CMD,        LIST_CMD,       MODUL_CMD,  INT_CMD, NO_PLURAL |ALLOW_RING}
    635633,{D(jjRES),       RES_CMD,        RESOLUTION_CMD, IDEAL_CMD,  INT_CMD, ALLOW_PLURAL |ALLOW_RING}
    636634,{D(jjRES),       RES_CMD,        RESOLUTION_CMD, MODUL_CMD,  INT_CMD, ALLOW_PLURAL |ALLOW_RING}
  • kernel/ideals.h

    rf0a16b r0f43c5  
    2020typedef ideal *            resolvente;
    2121
    22 inline ideal idCopyFirstK (const ideal ide, const int k)
     22static inline ideal idCopyFirstK (const ideal ide, const int k)
    2323{
    2424  return id_CopyFirstK(ide, k, currRing);
     
    2929
    3030/// delete an ideal
    31 inline void idDelete (ideal* h)
     31static inline void idDelete (ideal* h)
    3232{
    3333  id_Delete(h, currRing);
     
    167167BOOLEAN idIsSubModule(ideal id1,ideal id2);
    168168
    169 inline ideal idVec2Ideal(poly vec)
     169static inline ideal idVec2Ideal(poly vec)
    170170{
    171171  return id_Vec2Ideal(vec, currRing);
     
    174174ideal   idSeries(int n,ideal M,matrix U=NULL,intvec *w=NULL);
    175175
    176 inline BOOLEAN idIsZeroDim(ideal i)
     176static inline BOOLEAN idIsZeroDim(ideal i)
    177177{
    178178  return id_IsZeroDim(i, currRing);
     
    182182matrix  idDiffOp(ideal I, ideal J,BOOLEAN multiply=TRUE);
    183183
    184 inline intvec *idSort(ideal id,BOOLEAN nolex=TRUE)
     184static inline intvec *idSort(ideal id,BOOLEAN nolex=TRUE)
    185185{
    186186  return id_Sort(id, nolex, currRing);
     
    190190matrix  idCoeffOfKBase(ideal arg, ideal kbase, poly how);
    191191
    192 /// transpose a module
    193 inline ideal   idTransp(ideal a)
    194 {
    195   return id_Transp(a, currRing);
    196 }
    197 
    198192// intvec *idQHomWeight(ideal id);
    199193
  • libpolys/polys/simpleideals.h

    rf0a16b r0f43c5  
    117117intvec *id_Sort(const ideal id, const BOOLEAN nolex, const ring r);
    118118
     119/// transpose a module
    119120ideal id_Transp(ideal a, const ring rRing);
     121
    120122void id_Compactify(ideal id, const ring r);
    121123ideal  id_Mult (ideal h1,ideal  h2, const ring r);
Note: See TracChangeset for help on using the changeset viewer.