Browse Source

Fix array dimension (Reference-LAPACK 758)

tags/v0.3.22^2
Martin Kroeker GitHub 2 years ago
parent
commit
bc3393f703
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      lapack-netlib/TESTING/EIG/zsyl01.f

+ 1
- 1
lapack-netlib/TESTING/EIG/zsyl01.f View File

@@ -124,7 +124,7 @@
$ C( MAXM, MAXN ), CC( MAXM, MAXN ),
$ X( MAXM, MAXN ),
$ DUML( MAXM ), DUMR( MAXN ),
$ D( MIN( MAXM, MAXN ) )
$ D( MAX( MAXM, MAXN ) )
DOUBLE PRECISION SWORK( LDSWORK, 103 ), DUM( MAXN ), VM( 2 )
INTEGER ISEED( 4 ), IWORK( MAXM + MAXN + 2 )
* ..


Loading…
Cancel
Save