NAME

SRC/slaqz1.f

SYNOPSIS

Functions/Subroutines

subroutine slaqz1 (a, lda, b, ldb, sr1, sr2, si, beta1, beta2, v)
SLAQZ1

Function/Subroutine Documentation

subroutine slaqz1 (real, dimension( lda, * ), intent(in) a, integer, intent(in) lda, real, dimension( ldb, * ), intent(in) b, integer, intent(in) ldb, real, intent(in) sr1, real, intent(in) sr2, real, intent(in) si, real, intent(in) beta1, real, intent(in) beta2, real, dimension( * ), intent(out) v)

SLAQZ1

Purpose:



      Given a 3-by-3 matrix pencil (A,B), SLAQZ1 sets v to a


      scalar multiple of the first column of the product


      (*)  K = (A - (beta2*sr2 - i*si)*B)*B^(-1)*(beta1*A - (sr2 + i*si2)*B)*B^(-1).


      It is assumed that either


              1) sr1 = sr2


          or


              2) si = 0.


      This is useful for starting double implicit shift bulges


      in the QZ algorithm.

Parameters



          A is REAL array, dimension (LDA,N)


              The 3-by-3 matrix A in (*).

LDA



          LDA is INTEGER


              The leading dimension of A as declared in


              the calling procedure.



          B is REAL array, dimension (LDB,N)


              The 3-by-3 matrix B in (*).

LDB



          LDB is INTEGER


              The leading dimension of B as declared in


              the calling procedure.

SR1



          SR1 is REAL

SR2



          SR2 is REAL



          SI is REAL

BETA1



          BETA1 is REAL

BETA2



          BETA2 is REAL



          V is REAL array, dimension (N)


              A scalar multiple of the first column of the


              matrix K in (*).

Author

Thijs Steel, KU Leuven

Date

May 2020

Definition at line 125 of file slaqz1.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.