function Liniensuche                

%------------------------------------------------------------------
    globals                       % Initialisiert globale Variablen
%------------------------------------------------------------------

    alf = linspace(0,amax,smax);  % Vektor zur Abtastung des Intervalls [0,2]

    u0 = u;
    for i=1:smax
        u = u0 + alf(i)*du;
        KriegJh;
        J(i) = Jh; 
    end
    u = u0;

    Jmin = min(J);
    Jmax = max(J);
    i = find(J == Jmin,1);        % Findet Index f�r bestes alf

% Plotten der Zielfunktion entlang der Suchrichtung
    subplot(1,3,2)
    plot(alf,J/Jmax,'b',alf(i),J(i)/Jmax,'r*')
    grid on;
    xlabel('alf')
    ylabel('Jh(u+alf*du)/Jhmax')
    title('Zielfunktion entlang Suchrichtung')
    drawnow;

%------------------------------------------------------------------
    alf = alf(i);                 % Empfohlene Schrittweite
%------------------------------------------------------------------

end