

read "TestData1":





T := [];
                            
for i from 1 to nops(L) do

  

   T2:= 0:

   for j from 1 to 5 do
       print([i,j]);

       fd := L[i,j]:

       ff := subs([t1 = exp(x), t2 = log(exp(x)+x)], fd):
       TT2 := time(): g:=int(ff, x): TT2 := time() - TT2: T2 := T2 + TT2: print(T2);
       if op(0,g)=int then print(fake); end if; 


       
    end do:
    T := [op(T), evalf(T2/5)]; print(T); save T, Timing1int:
end do:

#save T, Timing1int:
