function [f] = testfunktion(x)
% Beispielfunktion aus dem Script fuer schlechte Konvergenz
%
% 16. 6. 1998, Helge Baumann
global nfc

nfc = nfc + 1;
f = x(1,:).^2 + 100.* x(2,:).^2;

return

