OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
BI_imvcopy.c File Reference
#include "Bdef.h"

Go to the source code of this file.

Functions

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

Function Documentation

◆ 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
n