var b, c: Vector;
bv:
TVec;
begin
b := Vector(TDoubleArray.Create(1,1,1,1)); b = [1,1,1,1];
bv := b;
// b and bv point to same data object
bv.Scale(2);
TVec(b).
Scale(2);
//an alternative way to scale
c := b*2 + Cplx(2,3); c := b*2 + 2 + 3i
c := b*bv; mix Vector and
TVec
bv.Add(c);
//pass Vector type and implicitely convert to TVec
end;