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.

Version 3.12.0

LAPACK