def Mat.ger

bend-blas-lapack@0.0.0.1 · mat.bend:187

import Base
import bend-blas-lapack@0.0.0.1/blas.bend as B

187# A = alpha x y^T + A
188def Mat.ger(+rows: Nat, +cols: Nat, alpha: F32, x: Vec<rows>, y: Vec<cols>, a: Mat<rows, cols>) -> IO(Result<&1, &1, U32 & String, Mat<rows, cols>>):
189  VecA{xs} = x
190  VecA{ys} = y
191  MatA{m} = a
192  IO.bind(Result<&1, &1, U32 & String, Array<F32>>, Result<&1, &1, U32 & String, Mat<rows, cols>>, B.Blas.sger(U32.from_nat(rows), U32.from_nat(cols), alpha, xs, ys, m), r => Mat.wrap(rows, cols, r))