Added support for xGERU and xGERC routines

1 files changed, 6 insertions, 0 deletions

diff --git a/src/kernels/level2/xger.opencl b/src/kernels/level2/xger.opencl
index aa765b6c..c1cddea1 100644
--- a/src/kernels/level2/xger.opencl
+++ b/src/kernels/level2/xger.opencl
@@ -62,6 +62,9 @@ __kernel void Xger(const int max_one, const int max_two, const real alpha,
       const int id1 = w*get_global_size(0) + get_global_id(0);
       if (id1 < max_one) {
         yvalues[w] = ygm[id1*y_inc + y_offset];
+        #if defined(ROUTINE_GERC)
+          COMPLEX_CONJUGATE(yvalues[w]);
+        #endif
       }
     }
 
@@ -110,6 +113,9 @@ __kernel void Xger(const int max_one, const int max_two, const real alpha,
       const int id2 = w*get_global_size(1) + get_global_id(1);
       if (id2 < max_two) {
         yvalues[w] = ygm[id2*y_inc + y_offset];
+        #if defined(ROUTINE_GERC)
+          COMPLEX_CONJUGATE(yvalues[w]);
+        #endif
       }
     }