var a: TOpenCLVector; begin CreateIt(a); try a.CopyFromArray(TSingleArray.Create(1,2,3,4)); // a = [1,2,3,4] a.LogN(10.0); // log base 10, the slow way a = [Log10(1), Log10(2),...] finally FreeIt(a); end; end;