removed lapack 3.6.0

2017-01-06 11:44:57 +01:00
parent 8f9975e013
commit 8cd46acebb
5835 changed files with 0 additions and 1612856 deletions
--- a/lapack-netlib/INSTALL/slamchtst.f
+++ b/lapack-netlib/INSTALL/slamchtst.f
@@ -1,63 +0,0 @@
-*> \brief \b SLAMCHTST
-*
-*  =========== DOCUMENTATION ===========
-*
-* Online html documentation available at 
-*            http://www.netlib.org/lapack/explore-html/ 
-*
-*
-*  Authors:
-*  ========
-*
-*> \author Univ. of Tennessee 
-*> \author Univ. of California Berkeley 
-*> \author Univ. of Colorado Denver 
-*> \author NAG Ltd. 
-*
-*> \date November 2011
-*
-*> \ingroup auxOTHERcomputational
-*
-*  =====================================================================      PROGRAM SLAMCHTST
-*
-*  -- LAPACK test routine (version 3.4.0) --
-*  -- LAPACK is a software package provided by Univ. of Tennessee,    --
-*  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
-*     November 2011
-*
-* =====================================================================
-*
-*     .. Local Scalars ..
-      REAL               BASE, EMAX, EMIN, EPS, RMAX, RMIN, RND, SFMIN,
-     $                   T, PREC
-*     ..
-*     .. External Functions ..
-      REAL               SLAMCH
-      EXTERNAL           SLAMCH
-*     ..
-*     .. Executable Statements ..
-*
-      EPS   = SLAMCH( 'Epsilon' )
-      SFMIN = SLAMCH( 'Safe minimum' )
-      BASE  = SLAMCH( 'Base' )
-      PREC  = SLAMCH( 'Precision' )
-      T     = SLAMCH( 'Number of digits in mantissa' )
-      RND   = SLAMCH( 'Rounding mode' )
-      EMIN  = SLAMCH( 'Minimum exponent' )
-      RMIN  = SLAMCH( 'Underflow threshold' )
-      EMAX  = SLAMCH( 'Largest exponent' )
-      RMAX  = SLAMCH( 'Overflow threshold' )
-*
-      WRITE( 6, * )' Epsilon                      = ', EPS
-      WRITE( 6, * )' Safe minimum                 = ', SFMIN
-      WRITE( 6, * )' Base                         = ', BASE
-      WRITE( 6, * )' Precision                    = ', PREC
-      WRITE( 6, * )' Number of digits in mantissa = ', T
-      WRITE( 6, * )' Rounding mode                = ', RND
-      WRITE( 6, * )' Minimum exponent             = ', EMIN
-      WRITE( 6, * )' Underflow threshold          = ', RMIN
-      WRITE( 6, * )' Largest exponent             = ', EMAX
-      WRITE( 6, * )' Overflow threshold           = ', RMAX
-      WRITE( 6, * )' Reciprocal of safe minimum   = ', 1 / SFMIN
-*
-      END