fix reference in format (Reference-LAPACK PR 1024)

mmuetzel · Jun 18, 2024 · a9817b4 · a9817b4
1 parent bf521a2
commit a9817b4
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lapack-netlib/TESTING/EIG/dlahd2.f b/lapack-netlib/TESTING/EIG/dlahd2.f
@@ -534,8 +534,8 @@ SUBROUTINE DLAHD2( IOUNIT, PATH )
      $      / ' 2: norm( I - Q'' Q )   / ( m ulp )',
      $      / ' 3: norm( I - PT PT'' )   / ( n ulp )',
      $      / ' 4: norm( Y - Q'' C )   / ( norm(Y) max(m,nrhs) ulp )' )
- 9968 FORMAT( / ' Tests performed:  See sdrvst.f' )
- 9967 FORMAT( / ' Tests performed:  See cdrvst.f' )
+ 9968 FORMAT( / ' Tests performed:  See ddrvst.f' )
+ 9967 FORMAT( / ' Tests performed:  See zdrvst.f' )
 *
 *     End of DLAHD2
 *