function x = buscaTemperatura(A,T,tiempo)
%function r = buscaTemperatura(A,T,tau,tol) buscar el valor A en el vector T, o al menos el que mas se acerque y devolvera 
%el valor de tau correspondiente

    d=1;
    
    while T(d)>A
        d = d + 1
    end
    
    x = tiempo(d);
  