Uses MtxExpr, Statistics;
procedure Example;
var m1: Matrix;
  uvec: Vector;
begin
  m1.SetIt(4,3,false,
    [ 1,2,3,
      4,2,1,
      3,2,3,
      3,3,1]);
  Unique(m1,uvec);
  // uvec elements are [1,2,3,4]
end;

#include "MtxExpr.hpp"
#include "Math387.hpp"
#include "Statistics.hpp"
void __fastcall Example()
{
  sMatrix m1;
  sVector uvec;

  m1.SetIt(4,3,false,OPENARRAY(double,(1,2,3,
                                      4,2,1,
                                      3,2,3,
                                      3,3,1)));
  Unique(m1,uvec);
  // uvec elements are [1,2,3,4]
}