SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ BI_imvcopy()

void BI_imvcopy ( Int  m,
Int  n,
Int A,
Int  lda,
Int buff 
)

Definition at line 2 of file BI_imvcopy.c.

6{
7 Int i, j;
8
9 if ( (m == lda) || (n == 1) )
10 {
11 m = n * m;
12 for (i=0; i < m; i++) buff[i] = A[i];
13 }
14 else if (m == 1)
15 {
16 for (j=0; j < n; j++) buff[j] = A[j*lda];
17 }
18 else
19 {
20 for (j=0; j < n; j++)
21 {
22 for (i=0; i < m; i++) buff[i] = A[i];
23 A += lda;
24 buff += m;
25 }
26 }
27}
#define Int
Definition Bconfig.h:22
Here is the caller graph for this function: