Changeset 75
- Timestamp:
- 08/12/08 17:16:58 (3 months ago)
- Location:
- include/fflas-ffpack
- Files:
-
- 2 modified
-
fflas_bounds.inl (modified) (1 diff)
-
ffpack_frobenius.inl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
include/fflas-ffpack/fflas_bounds.inl
r68 r75 107 107 double c = p-1; 108 108 double cplt=0; 109 if (!F.isZero (beta)) 109 if (!F.isZero (beta)){ 110 110 if (F.isOne (beta) || F.areEqual (beta, mone)) cplt = c; 111 111 else cplt = c*c; 112 } 112 113 kmax = floor ( (double ((1ULL << mantissa) - cplt)) / (c*c)); 113 114 if (kmax <= 1) -
include/fflas-ffpack/ffpack_frobenius.inl
r71 r75 246 246 for (size_t i=0; i<2*Ncurr; ++i) 247 247 rp[i] = 0; 248 size_t R; 248 249 try{ 249 size_tR = SpecRankProfile (F, Ma, Ncurr, Arp, ldarp, deg-1, rp);250 R = SpecRankProfile (F, Ma, Ncurr, Arp, ldarp, deg-1, rp); 250 251 } catch (CharpolyFailed){ 251 252 delete[] Arp; delete[] Ac; delete[] K; delete[] K3;
