Changeset 26 for include/fflas-ffpack/fflas_fgemm.inl
- Timestamp:
- 07/06/07 18:58:19 (2 years ago)
- Files:
-
- 1 modified
-
include/fflas-ffpack/fflas_fgemm.inl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
include/fflas-ffpack/fflas_fgemm.inl
r25 r26 1142 1142 if (w <= 0) 1143 1143 callClassicMatmul<double> () (F, ta, tb, m, n, k, 1144 alpha, A, lda, B, ldb, beta, C, ldc, kmax,base);1144 alpha, A, lda, B, ldb, beta, C, ldc, kmax,base); 1145 1145 else { 1146 if (k < kmax) { // switch on double 1147 // Temporary double matrices 1146 if (k < kmax) { // switch on delayed modulus 1148 1147 DoubleDomain::Element _alpha, _beta; 1149 1148 … … 1169 1168 WinoMain (DoubleDomain(), ta, tb, m, n, k, 1170 1169 _alpha, A, lda, B, ldb, _beta, C, ldc, kmax, w,base); 1171 // Conversion double = > GFq1170 // Modular reduction 1172 1171 for (double * Ci = C; Ci != C+m*ldc; Ci+=ldc) 1173 1172 for (size_t j = 0; j < n; ++j) … … 1180 1179 F.mulin (* (Ci + j), alpha); 1181 1180 } 1182 // Temporary double matrices destruction1183 1181 } 1184 1182 else{
