Чему равны внутренние парамеры процедуры

Interpol2[Lp_, Tzfp_, Hzfp_, Ltp_, Tdp_, tz_, noz_] := 
  Module[{Nmp, tn, tt, i, kt, kta, 
    ktb, \[Rho]0, \[Rho]1, \[Rho]2, \[Rho]3, \[Rho]4, \[Alpha]1, \
\[Alpha]0, \[Alpha]\[Alpha], \[Beta]1, \[Beta]0, \[Beta]\[Beta], c0, 
    c1, c2, k0, xt, Tw, Hw, k},
   Nmp = 2*Ltp + 1; tn = tz - Ltp*Tdp;
   Tw = {}; Hw = {};
   For[i = 1, i <= Nmp, i++, tt = tn + Tdp*(i - 1);
    kt = 1; While[(Tzfp[[kt]] < tt), kt++]; kta = kt - noz; 
    ktb = kt + noz - 1;
    If[kta < 1, kta = 1; ktb = 2*noz]; 
    If[ktb > Lp, kta = Lp - 2*noz + 1; ktb = Lp];
    \[Rho]4 = Sum[(Tzfp[[k]] - tt)^4, {k, kta, ktb}]; \[Rho]3 = 
     Sum[(Tzfp[[k]] - tt)^3, {k, kta, ktb}];
    \[Rho]2 = Sum[(Tzfp[[k]] - tt)^2, {k, kta, ktb}]; \[Rho]1 = 
     Sum[Tzfp[[k]] - tt, {k, kta, ktb}]; \[Rho]0 = 2*noz;
    c2 = Sum[Hzfp[[k]]*(Tzfp[[k]] - tt)^2, {k, kta, ktb}]; 
    c1 = Sum[Hzfp[[k]]*(Tzfp[[k]] - tt), {k, kta, ktb}]; 
    c0 = Sum[Hzfp[[k]], {k, kta, ktb}];
    \[Alpha]1 = (\[Rho]3^2 - \[Rho]2*\[Rho]4); \[Alpha]0 = (\[Rho]2*\
\[Rho]3 - \[Rho]1*\[Rho]4); \[Alpha]\[Alpha] = c2*\[Rho]3 - c1*\[Rho]4;
    \[Beta]1 = (\[Rho]2^2 - \[Rho]1*\[Rho]3); \[Beta]0 = (\[Rho]1*\
\[Rho]2 - \[Rho]0*\[Rho]3); \[Beta]\[Beta] = c1*\[Rho]2 - c0*\[Rho]3;
    xt = (\[Alpha]\[Alpha]*\[Beta]1 - \[Beta]\[Beta]*\[Alpha]1)/(\
\[Alpha]0*\[Beta]1 - \[Beta]0*\[Alpha]1);
    AppendTo[Tw, tt]; AppendTo[Hw, xt]
    ]; {Tw, Hw}];

Interpol2[...] :=  Module[{...., ktas = {}},
...
For[...., 
      ; AppendTo[Hw, xt]; ktas = Append[ktas, kta] 
      ]; {Tw, Hw} Print[ktas]]

Interpol2[...] := Module[{..., k, ktas},
....Hw = {}; ktas = {};
For[i = 1.... 
...AppendTo[Hw, xt]; ktas = Append[ktas, kta]
]; {Tw, Hw, ktas} ];

Interpol2[...] := Module[{..., k, ktas},
....Hw = {}; ktas = {};
For[i = 1.... 
...AppendTo[Hw, xt]; ktas = Append[ktas, kta]
];
Print[ktas];
{Tw, Hw}
];