rechlin3(a, x)

function i =  rechlin3(a, x)
% RECHLIN3 recherche         
%linaire par find           
% on les recherche tous      
% et on garde le premier.

a = a(:);                    
i = find(x==a);              
if i ~= [];                  
  i = i(1);                  
end;