From: couturie <couturie@extinction>
Date: Sat, 30 Apr 2016 08:13:59 +0000 (+0200)
Subject: new
X-Git-Url: https://bilbo.iut-bm.univ-fcomte.fr/and/gitweb/kahina_paper2.git/commitdiff_plain/53da0ad12f861879e3977e28d32e8c9e44a5258a?ds=inline

new
---

diff --git a/code.c b/code.c
index cb93014..b270653 100644
--- a/code.c
+++ b/code.c
@@ -77,19 +77,20 @@ cuDoubleComplex NewH_EA(int i, cuDoubleComplex *Z) {
 
 //kernels to update a root i
 __global__
-cuDoubleComplex H_EA(int i, cuDoubleComplex *Z) {
-  cuDoubleComplex c;
-  //if the root needs to be updated
-  if(!finished[i]) {
-    //according to the module of the root
-    if (Cmodule(Z[i])<=maxRadius)
-      //selects the normal version
-      c = FirstH_EA(i,Z);  
-    else
-      //of the Log Exp version
-      c = NewH_EA(i,Z);
-    return c;
+void Dev_EA(int i, cuDoubleComplex *Z, int size) {
+  int i= blockIdx.x*blockDim.x+ threadIdx.x;
+  if(i<size) {
+    //if the root needs to be updated
+    if(!finished[i]) {
+      //according to the module of the root
+      if (Cmodule(Z[i])<=maxRadius)
+	//selects the normal version
+	Z[i] = FirstH_EA(i,Z);  
+      else
+	//of the Log Exp version
+	Z[i] = NewH_EA(i,Z);
+      return c;
+    }
   }
-  else return Z[i];
 }