function [y,density] = randexp(lambda)
%
% y = randexp(lambda)
%
% Genera y distribuito come una v.a. esponenziale di parametro lambda.
%
% Calcola anche la densita` per lambda(1). Puo` essere testato con
%
% testva(@randexp,lambda*ones(1,10000))
y = -log(1-rand(size(lambda)))./lambda;
density = @(x) lambda(1)*exp(-lambda(1)*x);