Using the HMatrixEVD in Delphi

akunyer · **Joined:** Sat Jul 28, 2012 1:51 am **Posts:** 4

Hi , currently i'm trying to use the HMatrixEVD function in Delphi. The code required me to create the TComplex2DArray as one of the parameter for the function. Has anyone have the idea how to use it. I need some example at least 2x2 matrix just for the basic.

The function is to find the eigenvalues and eigenvectors of a symmetric matrix

My current code

Code:

uses evd, ap;
procedure TfrmMain.Button1Click(Sender: TObject);
var
  Comp: TComplex2DArray;
  D: TReal1DArray;
  Z: TComplex2DArray;

begin
  Comp[0, 0].X := 5;
  Comp[1, 0].X := 4;
  Comp[0, 1].X := 3;
  Comp[1, 1].X := 4;
  HMatrixEVD(Comp, 2, 0, True, D, Z);
end;

The current code has an error , i'm stuck on how to use it. I've tried to find the example , but still no enough.

Thanks

Sergey.Bochkanov · **Joined:** Fri May 07, 2010 7:06 am **Posts:** 927

You have to call SetLength() for the array before initializing it.

akunyer · **Joined:** Sat Jul 28, 2012 1:51 am **Posts:** 4

Ok , this problems have been solved. Thanks.

forum.alglib.net

Forum rules

Using the HMatrixEVD in Delphi

Who is online