var a,b: clMatrix; begin a.CopyCplxFromArray(1,2,TSingleArray.Create(1,2,3,-4)); // a = [1 + 2i, 3 - 4i] b.PhaseSpectrum(a); // b = [arctan2(1,2), arctan2(3,-4)]; end;