From 5629cc7fe94a67e58ff5a4ff52808e7dfb696ca8 Mon Sep 17 00:00:00 2001
From: Dalal Sukkari <dalal.sukkari@kaust.edu.sa>
Date: Wed, 22 Mar 2017 11:25:00 +0300
Subject: [PATCH] change the calculation of WC, because if n1 < m1 the results
will not be correct
---
runtime/starpu/codelets/codelet_ztsmqr.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/runtime/starpu/codelets/codelet_ztsmqr.c b/runtime/starpu/codelets/codelet_ztsmqr.c
index 7183c7f6f..126d6fb89 100644
--- a/runtime/starpu/codelets/codelet_ztsmqr.c
+++ b/runtime/starpu/codelets/codelet_ztsmqr.c
@@ -279,7 +279,7 @@ static void cl_ztsmqr_cuda_func(void *descr[], void *cl_arg)
starpu_codelet_unpack_args(cl_arg, &side, &trans, &m1, &n1, &m2, &n2, &k, &ib,
&lda1, &lda2, &ldv, &ldt, &ldwork);
- WC = W + ib * (side == MorseLeft ? n1 : m1);
+ WC = W + ib * (side == MorseLeft ? m1 : n1);
ldworkc = (side == MorseLeft) ? m1 : ib;
stream = starpu_cuda_get_local_stream();
--
GitLab