From 0b2f8dabbf9e6c4de8e4b62b3a8df96097a2c23f Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Wed, 23 Nov 2022 10:30:35 +0100 Subject: [PATCH 1/2] Fix array dimension (Reference-LAPACK 758) --- lapack-netlib/TESTING/EIG/csyl01.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lapack-netlib/TESTING/EIG/csyl01.f b/lapack-netlib/TESTING/EIG/csyl01.f index e21f1a7a0..82d790daa 100644 --- a/lapack-netlib/TESTING/EIG/csyl01.f +++ b/lapack-netlib/TESTING/EIG/csyl01.f @@ -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 ) ) REAL SWORK( LDSWORK, 54 ), DUM( MAXN ), VM( 2 ) INTEGER ISEED( 4 ), IWORK( MAXM + MAXN + 2 ) * .. From bc3393f703dadb95b7d69ca61a74bff793841fc5 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Wed, 23 Nov 2022 10:31:18 +0100 Subject: [PATCH 2/2] Fix array dimension (Reference-LAPACK 758) --- lapack-netlib/TESTING/EIG/zsyl01.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lapack-netlib/TESTING/EIG/zsyl01.f b/lapack-netlib/TESTING/EIG/zsyl01.f index 1e8619a34..329f39dc4 100644 --- a/lapack-netlib/TESTING/EIG/zsyl01.f +++ b/lapack-netlib/TESTING/EIG/zsyl01.f @@ -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 ) * ..