Module TQL1 in SEISPACK

• SEISPACK Information

• Components
  • Fullsource from NETLIB
  • Source from NETLIB

TQL1

 
Compute eigenvalues of symmetric tridiagonal matrix by QL method.
 
Classes  :  D4a5 .  Tridiagonal matrix eigenvalue problems
            D4c2a . Compute eigenvalues of tridiagonal matrix
 
Type     : Fortran subroutine in SEISPACK package.
Access   : Public domain. Portable.
Precision: Single.
Note     : Implementations vary among sites.
 
Usage    : CALL TQL1(N, D, E, IERR)
 
Details  : Fullsource Source
Sites    : (1) ARNO (2) NETLIB
 

Implementation of TQL1 from SEISPACK on ARNO

 
ARNO:      Silicon Graphics Origin 2000, National Institute of Standards and
           Technology (NIST), Gaithersburg, MD. Available to NIST staff.
 
Precision: Single.
 
Those logged in to arno.nist.gov or amur.nist.gov may access this module as
follows.
 
   Access       : f77 -o prog prog.f -lcomplib.sgimath (Note: prepend s to
                  routine name in call)
   Documentation: man stql1
 

Implementation of TQL1 from SEISPACK on NETLIB

 
NETLIB:    Public access repository, The University of Tennessee at
           Knoxville and Bell Laboratories
 
Precision: Single.
Note     : Double precision version available in NETLIB package EISPACK.
 
You may access components from NETLIB outside GAMS as follows.
 
   Source       : echo "send only tql1 from seispack" | mail netlib@ornl.gov
   Fullsource   : echo "send tql1 from seispack" | mail netlib@ornl.gov