function [] = simplex(fname,x,options)
% Aufrufdatei fuer das Simplex-Verfahren (Nelder-Mead Verfahren).
% Benutzung der MATLAB eigenen Simplex Routine.
%
% 11.08.98 Helge Baumann
%
if nargin < 3, options = []; end;
if nargin < 2, x = [-2;2]; end;
if nargin < 1, fname = 'rosenbrock'; end;

options(1) = 0;
[x,options] = fmins(fname,x,options);
disp('Gefundenes Minimum bei: ')
x

disp(strcat('\nAnzahl der Funktionsauswertungen:  ',int2str(options(10) ) ))

return;
