Added NX variable declaration to clarft that was initially missed

Johnathan Rhyne · Johnathan Rhyne · commit 68a1389c4b69 · 2025-10-22T13:32:08.000-06:00
diff --git a/SRC/clarft.f b/SRC/clarft.f
@@ -181,7 +181,7 @@ RECURSIVE SUBROUTINE CLARFT( DIRECT, STOREV, N, K, V, LDV,
 *
 *     .. Local Scalars ..
 *
-      INTEGER           I,J,L
+      INTEGER           I,J,L,NX
       LOGICAL           QR,LQ,QL,DIRF,COLV
 *
 *     .. External Subroutines ..

Original file line number	Diff line number	Diff line change
`@@ -181,7 +181,7 @@ RECURSIVE SUBROUTINE CLARFT( DIRECT, STOREV, N, K, V, LDV,`
`181`	`181`	`*`
`182`	`182`	`* .. Local Scalars ..`
`183`	`183`	`*`
`184`		`- INTEGER I,J,L`
	`184`	`+ INTEGER I,J,L,NX`
`185`	`185`	`LOGICAL QR,LQ,QL,DIRF,COLV`
`186`	`186`	`*`
`187`	`187`	`* .. External Subroutines ..`