.TH "TESTING/EIG/dslect.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*-
.ad l
.nh
.SH NAME
TESTING/EIG/dslect.f
.SH SYNOPSIS
.br
.PP
.SS "Functions/Subroutines"

.in +1c
.ti -1c
.RI "logical function \fBdslect\fP (zr, zi)"
.br
.RI "\fBDSLECT\fP "
.in -1c
.SH "Function/Subroutine Documentation"
.PP 
.SS "logical function dslect (double precision zr, double precision zi)"

.PP
\fBDSLECT\fP 
.PP
\fBPurpose:\fP
.RS 4

.PP
.nf
 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 successfully sorts eigenvalues,
 and by DCHK43 to test if DGEESX successfully 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\&.
.fi
.PP
 
.RE
.PP
\fBParameters\fP
.RS 4
\fIZR\fP 
.PP
.nf
          ZR is DOUBLE PRECISION
          The real part of a complex eigenvalue ZR + i*ZI\&.
.fi
.PP
.br
\fIZI\fP 
.PP
.nf
          ZI is DOUBLE PRECISION
          The imaginary part of a complex eigenvalue ZR + i*ZI\&.
.fi
.PP
 
.RE
.PP
\fBAuthor\fP
.RS 4
Univ\&. of Tennessee 
.PP
Univ\&. of California Berkeley 
.PP
Univ\&. of Colorado Denver 
.PP
NAG Ltd\&. 
.RE
.PP

.PP
Definition at line \fB61\fP of file \fBdslect\&.f\fP\&.
.SH "Author"
.PP 
Generated automatically by Doxygen for LAPACK from the source code\&.