XLPack 7.0
XLPack 数値計算ライブラリ (Excel VBA) リファレンスマニュアル
読み取り中…
検索中…
一致する文字列を見つけられません

◆ CsxDiagInd()

Sub CsxDiagInd ( M As  Long,
N As  Long,
Ptr() As  Long,
Ind() As  Long,
Id() As  Long,
Optional Info As  Long,
Optional Base As  Long = -1 
)

疎行列の対角要素のインデックス (CSC/CSR)

目的
CSCまたはCSR形式の疎行列の対角要素のインデックスを配列 Id() に出力する.
引数
[in]M行列の行数. (M >= 0) (M = 0 の場合, 処理を行わずに戻る)
[in]N行列の列数. (N >= 0) (N = 0 の場合, 処理を行わずに戻る)
[in]Ptr()配列 Ptr(LPtr - 1) (LPtr >= N + 1 (CSC), LPtr >= M + 1 (CSR))
行列の列ポインタ(CSC形式の場合)または行ポインタ(CSR形式の場合).
[in]Ind()配列 Ind(LInd - 1) (LInd >= Nnz)
行列の行インデクス(CSC形式の場合)または列インデクス(CSR形式の場合).
[out]Id()配列 D(LD - 1) (LD >= min(M, N))
対角要素のインデックス (i = 0 〜 min(m, n) - 1). ただし, 対角要素がない場合には -1 とする.
[out]Info(省略可)
= 0: 正常終了.
= i < 0: (-i)番目の入力パラメータの誤り.
= j > 0: j 個の対角要素がない.
[in]Base(省略可)
Ptr() および Ind() のインデクス形式.
= 0: 0-ベース(C形式): 開始インデクス値が 0.
= 1: 1-ベース(Fortran形式): 開始インデクス値が 1.
(省略時: Ptr(0) = 1 であれば 1, そうでなければ 0 とみなす)