Fast kernel -- ALGLIB routine -- 19.01.2010 Bochkanov Sergey *************************************************************************/
| 317 | Bochkanov Sergey |
| 318 | *************************************************************************/ |
| 319 | bool rmatrixgemmf(int m, |
| 320 | int n, |
| 321 | int k, |
| 322 | double alpha, |
| 323 | const ap::real_2d_array& a, |
| 324 | int ia, |
| 325 | int ja, |
| 326 | int optypea, |
| 327 | const ap::real_2d_array& b, |
| 328 | int ib, |
| 329 | int jb, |
| 330 | int optypeb, |
| 331 | double beta, |
| 332 | ap::real_2d_array& c, |
| 333 | int ic, |
| 334 | int jc) |
| 335 | { |
| 336 | #ifndef ALGLIB_INTERCEPTS_ABLAS |
| 337 | bool result; |
| 338 | |
| 339 | result = false; |
| 340 | return result; |
| 341 | #else |
| 342 | return ialglib::_i_rmatrixgemmf(m, n, k, alpha, a, ia, ja, optypea, b, ib, jb, optypeb, beta, c, ic, jc); |
| 343 | #endif |
| 344 | } |
| 345 | |
| 346 | |
| 347 | /************************************************************************* |