def Blas.sgemm
import bend-blas-lapack@0.0.0.1/blas.bend as Blasimport Base
22# C = alpha op(A) op(B) + beta C. A is m x k as stored (k x m when ta = 1),
23# B is k x n (n x k when tb = 1), C is m x n, all row-major. C is consumed
24# and the updated copy answered; pass beta = 0 and any m x n block for a
25# fresh product.
26def Blas.sgemm(ta: U32, tb: U32, m: U32, n: U32, k: U32, alpha: F32, a: Array<F32>, b: Array<F32>, beta: F32, c: Array<F32>) -> IO(Result<&1, &1, U32 & String, Array<F32>>):
27 import "./effs/blas_sgemm.c"
28 import "./effs/blas_sgemm.js"