Where is the error in Parallel.for?

[shixnazar 0]

begin
  h := 1 / (n - 1);              x[1]:= 0;            y[1]:= 0;
  for I := 2 to n do
  begin
    x:=x[i-1]+h;            y:=y[i-1]+h;
  end;

      for j := 1 to n do
          for I := 2 to n do
              p0[j]:=1;
//TParallel.For(1,nt,procedure(jt:Int64; i:Int64; j:Int64)
for jt := 1 to nt do
  begin
    t[jt]:=jt*tau;
    for j := 1 to n do

      for I := 1 to n do
           pt[j]:=exp(-2*x*y[j]*t[jt]);

     //TParallel.For(2,trunc(n/2+1),procedure(j:Int64; i:Int64)
     for j := 2 to trunc(n/2+1) do
         begin
           TParallel.For(2, n-1,procedure(i:Int64; j:Int64)
           //for i := 2 to n-1 do
             begin
              a:=1;
                          c:=1;
                          b:=2+2*h*h/tau;
                          ff:=h*h*(-2*(2*t[jt]*t[jt]*(x*x+y[j]*y[j])+x*y[j])*exp(-2*x*y[j]*t[jt]));
                          d:=2*h*h/tau*p0[j]+(p0[j-1]-2*p0[j]+p0[j+1])+ff;
             end);

end;

end;

end;

end;
 

 

 

Error: E2250 There is no overloaded version of 'For' that can be called with these arguments.

[Mark- 34]

Never used it so SWAG, two parameters?