From 35256671dee51315a0cd151641e6df9e4be040e2 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sun, 25 May 2025 15:28:05 +0200
Subject: [PATCH] Update cscal.c

---
 kernel/zarch/cscal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/kernel/zarch/cscal.c b/kernel/zarch/cscal.c
index ec98281b3..a8ecc142c 100644
--- a/kernel/zarch/cscal.c
+++ b/kernel/zarch/cscal.c
@@ -239,7 +239,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i,
           x[i] = 0.0;
           x[i + 1] = 0.0;
 	  }
-	  if (isnan(x[i+incx]) || isinf(x[i+incx]) || isnan(x[i+1+incx])) {
+	  if (isnan(x[i+inc_x]) || isinf(x[i+inc_x]) || isnan(x[i+1+inc_x])) {
           x[i + inc_x] = NAN;
           x[i + 1 + inc_x] = NAN;
 	  } else {