Browse Source

fix missing initialization

tags/v0.3.30
Martin Kroeker GitHub 3 months ago
parent
commit
906b9df316
No known key found for this signature in database GPG Key ID: B5690EEEBB952194
1 changed files with 1 additions and 0 deletions
  1. +1
    -0
      lapack-netlib/SRC/cgeqp3rk.f

+ 1
- 0
lapack-netlib/SRC/cgeqp3rk.f View File

@@ -761,6 +761,7 @@
* for the whole original matrix stored in A(1:M,1:N).
*
KP1 = ISAMAX( N, RWORK( 1 ), 1 )
MAXC2NRM = RWORK( KP1 )
*
* ==================================================================.
*


Loading…
Cancel
Save