function res=junge(r,g);
% Junge size distribution normalized to 1
%input : 
%       r - radius
%       g - Gamma paramterer Angstrom=g-2
%
C=g*(min(r)).^g.*(max(r)).^g./((max(r)).^g-(min(r)).^g);
res=C*r.^(-(g+1));

