Cr.bas ファイル

関数
Sub	Cr (N As Long, Val() As Double, Ptr() As Long, Ind() As Long, B() As Double, X() As Double, Optional Info As Long, Optional Iter As Long, Optional Res As Double, Optional Format As Long=0, Optional Mode As Long=0, Optional MaxIter As Long=500, Optional Tol As Double=1.0E-10, Optional Uplo As String="F", Optional Base As Long=-1, Optional Precon As Long=0, Optional Omega As Double=1.5)
	共役残差(CR)法による連立一次方程式 Ax = b の解 (対称行列) (ドライバ)