removed all extranous changes

jprhyne · jprhyne · commit d4741c8a5743 · 2024-11-30T08:52:03.000-05:00
diff --git a/SRC/dgelqf.f b/SRC/dgelqf.f
@@ -252,7 +252,7 @@ SUBROUTINE DGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO )
 *              H = H(i) H(i+1) . . . H(i+ib-1)
 *
                CALL DLARFT( 'Forward', 'Rowwise', N-I+1, IB, A( I,
-     $                      I ), 
+     $                      I ),
      $                      LDA, TAU( I ), WORK, LDWORK )
 *
 *              Apply H to A(i+ib:m,i:n) from the right

Original file line number	Diff line number	Diff line change
`@@ -252,7 +252,7 @@ SUBROUTINE DGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO )`
`252`	`252`	`* H = H(i) H(i+1) . . . H(i+ib-1)`
`253`	`253`	`*`
`254`	`254`	`CALL DLARFT( 'Forward', 'Rowwise', N-I+1, IB, A( I,`
`255`		`- $ I ),`
	`255`	`+ $ I ),`
`256`	`256`	`$ LDA, TAU( I ), WORK, LDWORK )`
`257`	`257`	`*`
`258`	`258`	`* Apply H to A(i+ib:m,i:n) from the right`