Changeset 52cc7a4 in git


Ignore:
Timestamp:
Aug 18, 2008, 2:26:02 PM (16 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c7af8613769b29c741d6c338945669719f1fc4f8')
Children:
6d898347af76d4482a05fd199bfbad769f001a03
Parents:
da2fc8d3786d00597bd91e3c2d5c1488846cb301
Message:
*hannes: code cleanup


git-svn-id: file:///usr/local/Singular/svn/trunk@11006 2c84dea3-7e68-4137-9b89-c4e89433aadc
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • Singular/wrapper.cc

    rda2fc8 r52cc7a4  
    3131  T->root=NULL;
    3232
    33   for (int i=0; i < v->idelems(); i++)
     33  for (int i=0; i < IDELEMS(v); i++)
    3434  {
    3535    if (v->m[i]!=NULL)
     
    6060  ideal I=(ideal)v->Data();
    6161  BOOLEAN is_zero=TRUE;
    62   for (int i=0; i < I->idelems(); i++)
     62  for (int i=0; i < IDELEMS(I); i++)
    6363  {
    6464    if ((I->m[i]!=NULL)&& (pIsConstant(I->m[i])))
  • kernel/sca.cc

    rda2fc8 r52cc7a4  
    77 *  Author:  motsak (Oleksandr Motsak)
    88 *  Created: 2006/12/18
    9  *  Version: $Id: sca.cc,v 1.27 2008-07-26 14:28:03 motsak Exp $
     9 *  Version: $Id: sca.cc,v 1.28 2008-08-18 12:25:35 Singular Exp $
    1010 *******************************************************************/
    1111
     
    27002700  assume( (iFirstAltVar >= 1) && (iLastAltVar <= r->N) && (iFirstAltVar <= iLastAltVar) );
    27012701
    2702   const int iSize = id->idelems();
     2702  const int iSize = IDELEMS(id);
    27032703
    27042704  if (iSize == 0) return id;
     
    27102710  {
    27112711    Print("ideal id: \n");
    2712     for (int i = 0; i < id->idelems(); i++)
     2712    for (int i = 0; i < IDELEMS(id); i++)
    27132713    {
    27142714      Print("; id[%d] = ", i+1);
     
    27302730  {
    27312731    Print("ideal temp: \n");
    2732     for (int i = 0; i < temp->idelems(); i++)
     2732    for (int i = 0; i < IDELEMS(temp); i++)
    27332733    {
    27342734      Print("; temp[%d] = ", i+1);
  • kernel/structs.h

    rda2fc8 r52cc7a4  
    44*  Computer Algebra System SINGULAR     *
    55****************************************/
    6 /* $Id: structs.h,v 1.54 2008-08-18 10:39:57 Singular Exp $ */
     6/* $Id: structs.h,v 1.55 2008-08-18 12:25:35 Singular Exp $ */
    77/*
    88* ABSTRACT
     
    697697  int ncols;
    698698  #define IDELEMS(i) ((i)->ncols)
    699   inline int& idelems(void) { return ncols; }
    700699};
    701700
     
    771770
    772771#if defined(__cplusplus)
    773 inline int si_max(const int a, const int b)  { return (a>b) ? a : b; }
    774 inline int si_min(const int a, const int b)  { return (a<b) ? a : b; }
    775 inline long si_max(const long a, const long b)  { return (a>b) ? a : b; }
    776 inline long si_min(const long a, const long b)  { return (a<b) ? a : b; }
     772static inline int si_max(const int a, const int b)  { return (a>b) ? a : b; }
     773static inline int si_min(const int a, const int b)  { return (a<b) ? a : b; }
     774static inline long si_max(const long a, const long b)  { return (a>b) ? a : b; }
     775static inline long si_min(const long a, const long b)  { return (a<b) ? a : b; }
    777776#else
    778777#define si_max(A,B) ((A) > (B) ? (A) : (B))
  • kernel/tgb.cc

    rda2fc8 r52cc7a4  
    55*  Computer Algebra System SINGULAR     *
    66****************************************/
    7 /* $Id: tgb.cc,v 1.157 2008-06-27 12:10:58 bricken Exp $ */
     7/* $Id: tgb.cc,v 1.158 2008-08-18 12:25:35 Singular Exp $ */
    88/*
    99* ABSTRACT: slimgb and F4 implementation
     
    29012901  current_degree=1;
    29022902
    2903   max_pairs=5*I->idelems();
     2903  max_pairs=5*IDELEMS(I);
    29042904
    29052905  apairs=(sorted_pair_node**) omalloc(sizeof(sorted_pair_node*)*max_pairs);
    29062906  pair_top=-1;
    29072907
    2908   int n=I->idelems();
     2908  int n=IDELEMS(I);
    29092909  array_lengths=n;
    29102910
     
    29732973  add_to_basis_ideal_quotient(I->m[0],this,NULL);
    29742974
    2975   assume(strat->sl==strat->Shdl->idelems()-1);
     2975  assume(strat->sl==IDELEMS(strat->Shdl)-1);
    29762976  if(!(F4_mode))
    29772977  {
     
    30033003      add_to_basis_ideal_quotient(I->m[i],this,NULL);
    30043004  }
    3005   for(i=0;i<I->idelems();i++)
     3005  for(i=0;i<IDELEMS(I);i++)
    30063006  {
    30073007    I->m[i]=NULL;
Note: See TracChangeset for help on using the changeset viewer.