Example

var a: TVec; begin CreateIt(a); try a.Size(5,True); a.Ramp(0,Pi); a.Sin; finally FreeIt(a); end; end;

which is identical to:

CreateIt(a); try a.Size(5,True); for i:= 0 to a.Length-1 do a[i] := sin(i*Pi); finally FreeIt(a); end;