|
|
◆ Zungtr()
| Sub Zungtr |
( |
Uplo As |
String, |
|
|
N As |
Long, |
|
|
A() As |
Complex, |
|
|
Tau() As |
Complex, |
|
|
Info As |
Long |
|
) |
| |
三重対角形への変換行列の生成 (エルミート行列)
- 目的
- 本ルーチンは Zhetrd が返す N - 1 個の基本鏡映の積により定義される N 次ユニタリ行列 Q を生成する.
Uplo = "U" の場合, Q = H(N-1) . . . H(2) H(1).
Uplo = "L" の場合, Q = H(1) H(2) . . . H(N-1).
- 引数
-
| [in] | Uplo | = "U": A() の上三角部分に Zhetrd から基本鏡映を格納する.
= "L": A() の下三角部分に Zhetrd から基本鏡映を格納する. |
| [in] | N | 行列 Q の行および列数. (N >= 0) (N = 0 の場合, 処理を行わずに戻る) |
| [in,out] | A() | 配列 A(LA1 - 1, LA2 - 1) (LA1 >= N, LA2 >= N)
[in] Zhetrd が返す基本鏡映を定義するベクトル.
[out] N x N ユニタリ行列 Q. |
| [in] | Tau() | 配列 Tau(LTau - 1) (LTau >= N - 1)
Zhetrd が返す基本鏡映のスカラー因子. |
| [out] | Info | = 0: 正常終了.
= -1: パラメータ Uplo の誤り (Uplo != "U" および "L")
= -2: パラメータ N の誤り (N < 0)
= -3: パラメータ A() の誤り.
= -4: パラメータ Tau() の誤り. |
- 出典
- LAPACK
- 使用例
- Zsteqrの使用例を参照せよ.
|