Copy Input parameters: M - number of rows N - number of columns A - source matrix, MxN submatrix is copied and transposed IA - submatrix offset (row index) JA - submatrix offset (column index) B - destination matrix IB - submatrix offset (row index) JB - submatrix offset (column index) ****************************************************
| 397 | JB - submatrix offset (column index) |
| 398 | *************************************************************************/ |
| 399 | void rmatrixcopy(int m, |
| 400 | int n, |
| 401 | const ap::real_2d_array& a, |
| 402 | int ia, |
| 403 | int ja, |
| 404 | ap::real_2d_array& b, |
| 405 | int ib, |
| 406 | int jb) |
| 407 | { |
| 408 | int i; |
| 409 | |
| 410 | for(i = 0; i <= m-1; i++) |
| 411 | { |
| 412 | ap::vmove(&b(ib+i, jb), 1, &a(ia+i, ja), 1, ap::vlen(jb,jb+n-1)); |
| 413 | } |
| 414 | } |
| 415 | |
| 416 | |
| 417 | /************************************************************************* |
no test coverage detected