LAPACK  3.5.0
LAPACK: Linear Algebra PACKage
 All Classes Files Functions Variables Typedefs Macros
sslect.f File Reference

Go to the source code of this file.

Functions/Subroutines

LOGICAL function sslect (ZR, ZI)
 SSLECT

Function/Subroutine Documentation

LOGICAL function sslect ( real  ZR,
real  ZI 
)

SSLECT

Purpose:
 SSLECT returns .TRUE. if the eigenvalue ZR+sqrt(-1)*ZI is to be
 selected, and otherwise it returns .FALSE.
 It is used by SCHK41 to test if SGEES succesfully sorts eigenvalues,
 and by SCHK43 to test if SGEESX succesfully sorts eigenvalues.

 The common block /SSLCT/ controls how eigenvalues are selected.
 If SELOPT = 0, then SSLECT return .TRUE. when ZR is less than zero,
 and .FALSE. otherwise.
 If SELOPT is at least 1, SSLECT returns SELVAL(SELOPT) and adds 1
 to SELOPT, cycling back to 1 at SELMAX.
Parameters
[in]ZR
          ZR is REAL
          The real part of a complex eigenvalue ZR + i*ZI.
[in]ZI
          ZI is REAL
          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 sslect.f.

Here is the call graph for this function:

Here is the caller graph for this function: