diff --git a/compute/pzlange.c b/compute/pzlange.c
index fc2ecfe6702f280fc49f3e22c988822533f66e0f..e72a19c28c416eb9e387e61ca3c993c085f40228 100644
--- a/compute/pzlange.c
+++ b/compute/pzlange.c
@@ -84,7 +84,7 @@ chameleon_pzlange_one( cham_uplo_t uplo, cham_diag_t diag, CHAM_desc_t *A,
          * Step 2:
          *  For each i, W(i, n) = reduce( W(0..P-1, n) )
          */
-        for(m = 1; m < P; n++) {
+        for(m = 1; m < P; m++) {
             INSERT_TASK_dgeadd(
                 options,
                 ChamNoTrans, 1, tempnn, A->nb,