public static double Asum(MatrixExpression a)
{
var i = a.Evaluate();
var r = Blas.asum(i.Length, i.Array, 0, 1);
if (a is not MatrixInput)
{
i.Dispose();
}
return(r);
}