Changeset e0d91c in git for Singular/syz0.cc
- Timestamp:
- Sep 22, 1998, 4:09:05 PM (26 years ago)
- Branches:
- (u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
- Children:
- 7709bf1f0117c77f62572e798d2164f8f0a773a4
- Parents:
- 8a839d187e734df8873c2c8aa439609fb0eb3333
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/syz0.cc
r8a839d1 re0d91c 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: syz0.cc,v 1.1 6 1998-06-12 17:41:41 obachmanExp $ */4 /* $Id: syz0.cc,v 1.17 1998-09-22 14:09:02 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: resolutions … … 433 433 int j,i=0; 434 434 poly p; 435 435 436 436 if (toNorm==NULL) return NULL; 437 437 p = pHead(toNorm); … … 447 447 //pNorm(toNorm); 448 448 toNorm = spSpolyRed(currQuotient->m[i],toNorm,NULL, SpolyLoop); 449 pDelete(&p); 449 pDelete(&p); 450 450 if (toNorm==NULL) return NULL; 451 451 p = pHead(toNorm); … … 805 805 bl1[j] = currRing->block1[m_order]; 806 806 wv[j] = currRing->wvhdl[m_order]; 807 808 809 810 811 812 807 tmpR = *currRing; 808 tmpR.order = ord; 809 tmpR.block0 = bl0; 810 tmpR.block1 = bl1; 811 tmpR.wvhdl = wv; 812 rComplete(&tmpR); 813 813 rChangeCurrRing(&tmpR, TRUE); 814 814 }
Note: See TracChangeset
for help on using the changeset viewer.