%
%  Funktion zur Berechnung der Resonanzfrequenz: 
%    aus den übergebenen Parametern k, m und d: 
%    w = sqrt( k/m ),
%    fres = sqrt( w^2 - 2*d^2 ) / (2+p)  
% 
%    Test: k = 10 N/m, m = 0.1 kg, d = 0.01 1/s 
%    >> fres = Resonanz( 10, 0.1, 0.01 )
%     fres =  1.5915
% 
function fres = Resonanz( k, m, d )
   w = sqrt( k / m );
   fres = sqrt( w^2 - 2*d^2 ) / (2 * pi);  
