CreateIt(a,b); With TVec(Self) do try Ln(Base); //First do it the normal way then fix the anomalies Mul(Exponent); Exp; a.FindIndexes(Exponent,'=',0); b.Size(a.Length,Complex); b.Setval(1); Scatter(b,a); finally FreeIt(a,b); end;