function fehler=ifunction(parameter)
global A;

omega=A(:,1);
impedance=A(:,2);
phase=A(:,3);

% hier formel für Impedanz und Phase von RCL Modell angeben.
% In diesem Fall RC Kreis:
%Parameter 1 ist R, Parameter 2 ist C

impedance_calc=sqrt(parameter(1).^2+1.0./(omega.^2.*parameter(2).^2));
phase_calc=atan(-1.0./omega.*parameter(1).*parameter(2));
fehler=sum((impedance_calc-impedance).^2+(phase_calc-phase).^2);
% fehler = Summe vom Fehlerquadrat