Changeset 6ce260 in git


Ignore:
Timestamp:
Apr 1, 1998, 9:01:42 PM (26 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b21a664aa22dc6e196223af8a74ad4885e83547c')
Children:
36ff0ee47861d9c243c573d5f915206fde045c9b
Parents:
9917052fb66734c3cc2e6270ba510557c9250002
Message:
* hannes: syz1.cc fixed bug in conversion (list<->res.):
          handling "empty" case


git-svn-id: file:///usr/local/Singular/svn/trunk@1309 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/syz1.cc

    r991705 r6ce260  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: syz1.cc,v 1.22 1998-03-27 11:41:00 obachman Exp $ */
     4/* $Id: syz1.cc,v 1.23 1998-04-01 19:01:42 Singular Exp $ */
    55/*
    66* ABSTRACT: resolutions
     
    22302230  }
    22312231  resolvente tr;
    2232   int typ0;
     2232  int typ0=IDEAL_CMD;
    22332233  if (syzstr->minres!=NULL)
    22342234    tr = syzstr->minres;
    22352235  else
    22362236    tr = syzstr->fullres;
    2237   resolvente trueres=(resolvente)Alloc0((syzstr->length)*sizeof(ideal));
    2238   for (int i=(syzstr->length)-1;i>=0;i--)
    2239   {
    2240     if (tr[i]!=NULL)
    2241     {
    2242       trueres[i] = idCopy(tr[i]);
    2243     }
    2244   }
    2245   if (idRankFreeModule(trueres[0])==0)
    2246     typ0 = IDEAL_CMD;
    2247   else
    2248     typ0 = MODUL_CMD;
     2237  resolvente trueres=NULL;
     2238  if (syzstr->length>0)
     2239  {
     2240    trueres=(resolvente)Alloc0((syzstr->length)*sizeof(ideal));
     2241    for (int i=(syzstr->length)-1;i>=0;i--)
     2242    {
     2243      if (tr[i]!=NULL)
     2244      {
     2245        trueres[i] = idCopy(tr[i]);
     2246      }
     2247    }
     2248    if (idRankFreeModule(trueres[0])>0)
     2249      typ0 = MODUL_CMD;
     2250  }   
    22492251  return liMakeResolv(trueres,syzstr->length,-1,typ0,NULL);
    22502252}
Note: See TracChangeset for help on using the changeset viewer.