1 files changed, 7 insertions, 2 deletions
diff --git a/src/elementaryFunctions/pow/zpowa.c b/src/elementaryFunctions/pow/zpowa.c
index afde3f49..ace264de 100644
--- a/src/elementaryFunctions/pow/zpowa.c
+++ b/src/elementaryFunctions/pow/zpowa.c
@@ -12,9 +12,14 @@
 
 #include "pow.h"
 
-void zpowa(doubleComplex* x, int size, doubleComplex y, doubleComplex *out) {
+void zpowa(doubleComplex* x, int size, doubleComplex* y, doubleComplex *out) {
+	/* 
+	Computes Scilab x.^power
+	Computes power element by element 
+	x and power must have same size 
+	*/
   int i = 0;
   for (i = 0; i < size; ++i) {
-    out[i] = zpows(x[i], y);
+    out[i] = zpows(x[i], y[i]);
   }
 }