.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\&.