MAGMA  magma-1.4.0
Matrix Algebra on GPU and Multicore Architectures
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups
zpanel_to_q.cpp File Reference
#include "common_magma.h"
Include dependency graph for zpanel_to_q.cpp:

Go to the source code of this file.

Functions

void zpanel_to_q (char uplo, magma_int_t ib, magmaDoubleComplex *A, magma_int_t lda, magmaDoubleComplex *work)
 
void zq_to_panel (char uplo, magma_int_t ib, magmaDoubleComplex *A, magma_int_t lda, magmaDoubleComplex *work)
 

Function Documentation

void zpanel_to_q ( char  uplo,
magma_int_t  ib,
magmaDoubleComplex *  A,
magma_int_t  lda,
magmaDoubleComplex *  work 
)

Definition at line 17 of file zpanel_to_q.cpp.

References MAGMA_Z_ONE, and MAGMA_Z_ZERO.

18 {
19  int i, j, k = 0;
20  magmaDoubleComplex *col;
21  magmaDoubleComplex c_zero = MAGMA_Z_ZERO;
22  magmaDoubleComplex c_one = MAGMA_Z_ONE;
23 
24  if (uplo == 'U' || uplo == 'u'){
25  for(i = 0; i < ib; ++i){
26  col = A + i*lda;
27  for(j = 0; j < i; ++j){
28  work[k] = col[j];
29  col [j] = c_zero;
30  ++k;
31  }
32 
33  work[k] = col[i];
34  col [j] = c_one;
35  ++k;
36  }
37  }
38  else {
39  for(i=0; i<ib; ++i){
40  col = A + i*lda;
41  work[k] = col[i];
42  col [i] = c_one;
43  ++k;
44  for(j=i+1; j<ib; ++j){
45  work[k] = col[j];
46  col [j] = c_zero;
47  ++k;
48  }
49  }
50  }
51 }
#define MAGMA_Z_ZERO
Definition: magma.h:131
#define A(i, j)
Definition: cprint.cpp:16
#define MAGMA_Z_ONE
Definition: magma.h:132

Here is the caller graph for this function:

void zq_to_panel ( char  uplo,
magma_int_t  ib,
magmaDoubleComplex *  A,
magma_int_t  lda,
magmaDoubleComplex *  work 
)

Definition at line 57 of file zpanel_to_q.cpp.

58 {
59  int i, j, k = 0;
60  magmaDoubleComplex *col;
61 
62  if (uplo == 'U' || uplo == 'u'){
63  for(i = 0; i < ib; ++i){
64  col = A + i*lda;
65  for(j = 0; j <= i; ++j){
66  col[j] = work[k];
67  ++k;
68  }
69  }
70  }
71  else {
72  for(i = 0; i < ib; ++i){
73  col = A + i*lda;
74  for(j = i; j < ib; ++j){
75  col[j] = work[k];
76  ++k;
77  }
78  }
79  }
80 }
#define A(i, j)
Definition: cprint.cpp:16

Here is the caller graph for this function: