Uses MtxExpr, RegModels;
procedure Example;
var YHat: Vector;
    X: Matrix;
begin
  X.SetIt(3,3,false,[2, -3, 5,
                     1, 6, -4,
                     8, 7, 9]);
  MulLinEval([1, 0.5, -2],X,YHat,false); // no constant term !
  // YHat = (-9.5, 12, -6.5)
end;

#include "MtxExpr.hpp"
#include "Math387.hpp"
#include "RegModels.hpp"
#include "MtxVecTee.hpp"
void __fastcall Example();
{
  sMatrix X;
  sVector YHat;

  X.SetIt(3,3,false,OPENARRAY(double,(2, -3, 5,
                     1, 6, -4,
                     8, 7, 9)));
  MulLinEval(OPENARRAY(double,(1,0.5,-2)),X,YHat,false); // no constant term!
  // YHat = (-9.5, 12, -6.5)
}