From b9e504b5f8e40ca69ba8e6cb6eea5fff2eaa2add Mon Sep 17 00:00:00 2001
From: Andrew <16061801+brada4@users.noreply.github.com>
Date: Fri, 12 Oct 2018 19:13:00 +0300
Subject: [PATCH] clean last unused variable warning in C LAPACK

---
 lapack/trtri/trtri_L_parallel.c | 6 +++---
 lapack/trtri/trtri_U_parallel.c | 6 +++---
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/lapack/trtri/trtri_L_parallel.c b/lapack/trtri/trtri_L_parallel.c
index 5dc60b862..22b7387d0 100644
--- a/lapack/trtri/trtri_L_parallel.c
+++ b/lapack/trtri/trtri_L_parallel.c
@@ -54,7 +54,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
   BLASLONG n, info;
   BLASLONG bk, i, blocking, start_i;
   int mode;
-  BLASLONG lda, range_N[2];
+  BLASLONG lda;//, range_N[2];
   blas_arg_t newarg;
   FLOAT *a;
   FLOAT alpha[2] = { ONE, ZERO};
@@ -100,8 +100,8 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
     bk = n - i;
     if (bk > blocking) bk = blocking;
 
-    range_N[0] = i;
-    range_N[1] = i + bk;
+    /* range_N[0] = i;
+    range_N[1] = i + bk; */
 
     newarg.lda = lda;
     newarg.ldb = lda;
diff --git a/lapack/trtri/trtri_U_parallel.c b/lapack/trtri/trtri_U_parallel.c
index fc48a33f1..9441b5f02 100644
--- a/lapack/trtri/trtri_U_parallel.c
+++ b/lapack/trtri/trtri_U_parallel.c
@@ -54,7 +54,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
   BLASLONG n, info;
   BLASLONG bk, i, blocking;
   int mode;
-  BLASLONG lda, range_N[2];
+  BLASLONG lda;//, range_N[2];
   blas_arg_t newarg;
   FLOAT *a;
   FLOAT alpha[2] = { ONE, ZERO};
@@ -96,8 +96,8 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
     bk = n - i;
     if (bk > blocking) bk = blocking;
 
-    range_N[0] = i;
-    range_N[1] = i + bk;
+    /* range_N[0] = i;
+    range_N[1] = i + bk; */
 
     newarg.lda = lda;
     newarg.ldb = lda;