LAPACK  3.5.0
LAPACK: Linear Algebra PACKage
 All Files Functions Typedefs Macros
dslect.f File Reference

Go to the source code of this file.

Functions/Subroutines

logical function dslect (ZR, ZI)
 DSLECT More...
 

Function/Subroutine Documentation

logical function dslect ( double precision  ZR,
double precision  ZI 
)

DSLECT

Purpose:
 DSLECT returns .TRUE. if the eigenvalue ZR+sqrt(-1)*ZI is to be
 selected, and otherwise it returns .FALSE.
 It is used by DCHK41 to test if DGEES succesfully sorts eigenvalues,
 and by DCHK43 to test if DGEESX succesfully sorts eigenvalues.

 The common block /SSLCT/ controls how eigenvalues are selected.
 If SELOPT = 0, then DSLECT return .TRUE. when ZR is less than zero,
 and .FALSE. otherwise.
 If SELOPT is at least 1, DSLECT returns SELVAL(SELOPT) and adds 1
 to SELOPT, cycling back to 1 at SELMAX.
Parameters
[in]ZR
          ZR is DOUBLE PRECISION
          The real part of a complex eigenvalue ZR + i*ZI.
[in]ZI
          ZI is DOUBLE PRECISION
          The imaginary part of a complex eigenvalue ZR + i*ZI.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 63 of file dslect.f.