def Blas.sgemv
import bend-blas-lapack@0.0.0.1/blas.bend as Blasimport Base
33# y = alpha op(A) x + beta y. A is m x n as stored, row-major; ta = 1
34# applies A^T, so x has n elements (m when ta) and y has m (n when ta).
35# y is consumed and the updated copy answered.
36def Blas.sgemv(ta: U32, m: U32, n: U32, alpha: F32, a: Array<F32>, x: Array<F32>, beta: F32, y: Array<F32>) -> IO(Result<&1, &1, U32 & String, Array<F32>>):
37 import "./effs/blas_sgemv.c"
38 import "./effs/blas_sgemv.js"