D1a. ベクトル基本演算 BLAS1

関数
Function	Dasum (N As Long, X_I As Double, Optional IncX As Long=1) As Double
	|x| (1-ノルム) (BLAS 1)
Sub	Daxpy (N As Long, A As Double, X_I As Double, Y_I As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	y <- ax + y (BLAS 1)
Sub	Dcopy (N As Long, X_I As Double, Y_I As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	y <- x (BLAS 1)
Function	Ddot (N As Long, X_I As Double, Y_I As Double, Optional IncX As Long=1, Optional IncY As Long=1) As Double
	xT * y (BLAS 1)
Function	Dnrm2 (N As Long, X_I As Double, Optional IncX As Long=1) As Double
	||x||2 (2-ノルム) (BLAS 1)
Sub	Drot (N As Long, X_I As Double, Y_I As Double, C As Double, S As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	ギブンス変換を適用する (BLAS 1)
Sub	Drotg (A As Double, B As Double, C As Double, S As Double)
	ギブンス変換を求める (BLAS 1)
Sub	Drotm (N As Long, X_I As Double, Y_I As Double, P() As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	修正ギブンス変換を適用する (BLAS 1)
Sub	Drotmg (D1 As Double, D2 As Double, X1 As Double, Y1 As Double, P() As Double)
	修正ギブンス変換を求める (BLAS 1)
Sub	Dscal (N As Long, A As Double, X_I As Double, Optional IncX As Long=1)
	x <- ax (BLAS 1)
Sub	Dswap (N As Long, X_I As Double, Y_I As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	y <-> x (BLAS 1)
Sub	Dasum_sub (Ret As Double, N As Long, X_I As Double, Optional IncX As Long=1)
	|x| (1-ノルム) (BLAS 1) (サブルーチン版)
Sub	Ddot_sub (Ret As Double, N As Long, X_I As Double, Y_I As Double, Optional IncX As Long=1, Optional IncY As Long=1)
	xT * y (BLAS 1) (サブルーチン版)
Sub	Dnrm2_sub (Ret As Double, N As Long, X_I As Double, Optional IncX As Long=1)
	||x||2 (2-ノルム) (BLAS 1) (サブルーチン版)

詳解

D1a. ベクトル基本演算 BLAS1 プログラムを表示しています.