function l = ML_exp(a, x)

% l = ML_exp(a, x)
%
% Räknar ut exponentialfördelningens loglikelihoodfunktion för
% varje element i a.
%
%                                     n
%                                   -----
%                           1       \
%     l(a) = -n * ln a  -  ---  *    )     x
%                           a       /       i
%                                   -----
%                                   i = 1

% Joakim Lübeck, 990224

n = length(x);
l = -n*log(a) - 1./a * sum(x);
