The function "While" is aproximately 4 times slower than the function "For" or "Eval"

[maalamo]

Real SecIni = Copy(Time);
Real j = 0;
Real t = 100000;
Real While(j<t,
{

Real j := j+1;
Copy(False)

});
WriteLn("Segundos Trascurridos While: "<< (Copy(Time)-SecIni));
Real SecIni2 = Copy(Time);
Set a = For(1, t, Real(Real n)
{

Copy(False)

});
WriteLn("Segundos Trascurridos For: "<< (Copy(Time)-SecIni2));
Set a := Copy(Empty);
Real SecIni3 = Copy(Time);
Set a := Copy(Range(1, t, 1));
WriteLn("Segundos Trascurridos C: "<< (Copy(Time)-SecIni3));
Real SecIni4 = Copy(Time);
Set EvalSet(a, Real(Real n)
{

Copy(False)

});
WriteLn("Segundos Trascurridos EvalSet: "<< (Copy(Time)-SecIni4));

[Víctor de Buen Remiro]

While is not properly slower than For or EvalSet but require evaluate more TOL expressions.

If you try this

Real j_ = 0;
Set EvalSet(a, Real(Real n)
{

Real j_ := j_+1;
Copy(j<t)

});

elapsed time in While and EvalSet are very close.

This is not a bug but certainly TOL is slow in both cases, so status change to REMIND