slctes.f3

Usage

Functions/Subroutines

logical function slctes (zr, zi, d)
SLCTES

Function/Subroutine Documentation

logical function slctes (real zr, real zi, real d)

SLCTES

Purpose:

!>
!> SLCTES returns .TRUE. if the eigenvalue (ZR/D) + sqrt(-1)*(ZI/D)
!> is to be selected (specifically, in this subroutine, if the real
!> part of the eigenvalue is negative), and otherwise it returns
!> .FALSE..
!>
!> It is used by the test routine SDRGES to test whether the driver
!> routine SGGES successfully sorts eigenvalues.
!>

Parameters

!>          ZR is REAL
!>          The numerator of the real part of a complex eigenvalue
!>          (ZR/D) + i*(ZI/D).
!>

!>          ZI is REAL
!>          The numerator of the imaginary part of a complex eigenvalue
!>          (ZR/D) + i*(ZI).
!>

!>          D is REAL
!>          The denominator part of a complex eigenvalue
!>          (ZR/D) + i*(ZI/D).
!>

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 67 of file slctes.f.