var a: TOpenCLVector; begin CreateIt(a); try a.CopyFromArray(TSingleArray.Create(1,2,3,4)); // a = [1,2,3,4] a.Exp10; // a = [10,100,1000,10000] finally FreeIt(a); end; end;