function [f]=testfunktion_a(x)
% Die Funktion aus Aufgabe 8a, Optimierung WS 95/96.
% Gesucht ist ein lokales Maximum dieser Funktion mittels der
% Methode von Nelder-Mead.
%
% Helge Baumann, 3.5.1998
global nfc

%lokale Variablen
sqrx1 = x(1,:) .* x(1,:);
sqrx2 = x(2,:) .* x(2,:);


nfc = nfc +1;
f = [sqrx1.*x(2,:) - 0.5.*sqrx1 + 0.25.*sqrx2 + 0.5.*(2-sqrx1-sqrx2).^2 ];
