ScaLAPACK 2.1
2.1
ScaLAPACK: Scalable Linear Algebra PACKage
BI_svmcopy.c
Go to the documentation of this file.
1
#include "
Bdef.h
"
2
3
void
BI_svmcopy
(
int
m,
int
n,
float
*A,
int
lda,
float
*buff)
4
/*
5
* performs an vector to matrix copy (unpack) for the data type float
6
*/
7
{
8
int
i, j;
9
10
if
( (m == lda) || (n == 1) )
11
{
12
m = n * m;
13
for
(i=0; i < m; i++) A[i] = buff[i];
14
}
15
else
if
(m == 1)
16
{
17
for
(j=0; j < n; j++) A[j*lda] = buff[j];
18
}
19
else
20
{
21
for
(j=0; j< n; j++)
22
{
23
for
(i=0; i < m; i++) A[i] = buff[i];
24
A += lda;
25
buff += m;
26
}
27
}
28
}
BI_svmcopy
void BI_svmcopy(int m, int n, float *A, int lda, float *buff)
Definition:
BI_svmcopy.c:3
Bdef.h
BLACS
SRC
BI_svmcopy.c
Generated by
1.8.16