コード例 #1
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Cpotrs(o blas.Order, ul blas.Uplo, n int, nRHS int, a []complex64, lda int, b []complex64, ldb int) int {
	return int(C.clapack_cpotrs(C.enum_CBLAS_ORDER(o), C.enum_CBLAS_UPLO(ul), C.int(n), C.int(nRHS), unsafe.Pointer(&a[0]), C.int(lda), unsafe.Pointer(&b[0]), C.int(ldb)))
}
コード例 #2
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Cgetrs(o blas.Order, t blas.Transpose, n int, nRHS int, a []complex64, lda int, ipiv []int32, b []complex64, ldb int) int {
	return int(C.clapack_cgetrs(C.enum_CBLAS_ORDER(o), C.enum_CBLAS_TRANSPOSE(t), C.int(n), C.int(nRHS), unsafe.Pointer(&a[0]), C.int(lda), (*C.int)(&ipiv[0]), unsafe.Pointer(&b[0]), C.int(ldb)))
}
コード例 #3
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Cgetri(o blas.Order, n int, a []complex64, lda int, ipiv []int32) int {
	return int(C.clapack_cgetri(C.enum_CBLAS_ORDER(o), C.int(n), unsafe.Pointer(&a[0]), C.int(lda), (*C.int)(&ipiv[0])))
}
コード例 #4
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Dgetri(o blas.Order, n int, a []float64, lda int, ipiv []int32) int {
	return int(C.clapack_dgetri(C.enum_CBLAS_ORDER(o), C.int(n), (*C.double)(&a[0]), C.int(lda), (*C.int)(&ipiv[0])))
}
コード例 #5
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Dpotrs(o blas.Order, ul blas.Uplo, n int, nRHS int, a []float64, lda int, b []float64, ldb int) int {
	return int(C.clapack_dpotrs(C.enum_CBLAS_ORDER(o), C.enum_CBLAS_UPLO(ul), C.int(n), C.int(nRHS), (*C.double)(&a[0]), C.int(lda), (*C.double)(&b[0]), C.int(ldb)))
}
コード例 #6
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Dgetrs(o blas.Order, t blas.Transpose, n int, nRHS int, a []float64, lda int, ipiv []int32, b []float64, ldb int) int {
	return int(C.clapack_dgetrs(C.enum_CBLAS_ORDER(o), C.enum_CBLAS_TRANSPOSE(t), C.int(n), C.int(nRHS), (*C.double)(&a[0]), C.int(lda), (*C.int)(&ipiv[0]), (*C.double)(&b[0]), C.int(ldb)))
}
コード例 #7
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Dgesv(o blas.Order, n int, nRHS int, a []float64, lda int, ipiv []int32, b []float64, ldb int) int {
	return int(C.clapack_dgesv(C.enum_CBLAS_ORDER(o), C.int(n), C.int(nRHS), (*C.double)(&a[0]), C.int(lda), (*C.int)(&ipiv[0]), (*C.double)(&b[0]), C.int(ldb)))
}
コード例 #8
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Sgetri(o blas.Order, n int, a []float32, lda int, ipiv []int32) int {
	return int(C.clapack_sgetri(C.enum_CBLAS_ORDER(o), C.int(n), (*C.float)(&a[0]), C.int(lda), (*C.int)(&ipiv[0])))
}
コード例 #9
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Zgetrf(o blas.Order, m int, n int, a []complex128, lda int, ipiv []int32) int {
	return int(C.clapack_zgetrf(C.enum_CBLAS_ORDER(o), C.int(m), C.int(n), unsafe.Pointer(&a[0]), C.int(lda), (*C.int)(&ipiv[0])))
}
コード例 #10
0
ファイル: lapack.go プロジェクト: kortschak/lapack
func Zgesv(o blas.Order, n int, nRHS int, a []complex128, lda int, ipiv []int32, b []complex128, ldb int) int {
	return int(C.clapack_zgesv(C.enum_CBLAS_ORDER(o), C.int(n), C.int(nRHS), unsafe.Pointer(&a[0]), C.int(lda), (*C.int)(&ipiv[0]), unsafe.Pointer(&b[0]), C.int(ldb)))
}