Uses MtxExpr, StatRandom;
procedure Example;
var Res: Vector;
begin
  Res.Size(2000);
  RandomGamma(4,0.25, Res);
end;

#include "MtxExpr.hpp"
#include "StatRandom.hpp"
void __fastcall Example()
{
  sVector Res;
  Res.Size(2000,false);
  RandomGamma(4, 0.25, Res, -1);
}