Changeset c91f233 in git
- Timestamp:
- Apr 27, 2000, 2:27:43 PM (23 years ago)
- Branches:
- (u'spielwiese', 'f6c3dc58b0df4bd712574325fe76d0626174ad97')
- Children:
- baaef953172dcd8436a1bc15e9fa34c7c74d8459
- Parents:
- e5f8ae07e0b41bb1b0e5aaaac2dad244e619d563
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/sparsmat.cc
re5f8ae rc91f233 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: sparsmat.cc,v 1.2 6 2000-04-19 15:45:00pohl Exp $ */4 /* $Id: sparsmat.cc,v 1.27 2000-04-27 12:27:43 pohl Exp $ */ 5 5 6 6 /* … … 85 85 int rpiv, cpiv; // position of the pivot 86 86 int normalize; // Normalization flag 87 Exponent_t *perm;// permutation of rows87 int *perm; // permutation of rows 88 88 float wpoints; // weight of all points 89 89 float *wrw, *wcl; // weights of rows and columns … … 346 346 tored = nrows; // without border 347 347 i = tored+1; 348 perm = ( Exponent_t *)Alloc(sizeof(Exponent_t)*(i+1));348 perm = (int *)Alloc(sizeof(int)*(i+1)); 349 349 perm[i] = 0; 350 350 m_row = (smpoly *)Alloc0(sizeof(smpoly)*i); … … 383 383 Free((ADDRESS)wrw, sizeof(float)*i); 384 384 Free((ADDRESS)m_row, sizeof(smpoly)*i); 385 Free((ADDRESS)perm, sizeof( Exponent_t)*(i+1));385 Free((ADDRESS)perm, sizeof(int)*(i+1)); 386 386 } 387 387
Note: See TracChangeset
for help on using the changeset viewer.