disp(' Prüfung SS 2000 Aufgabe 6 ');
% 26.06.2001
%
x0=0;
xf=4;
y0=[0,-1];
%
[x,y]=ode45('SS00_6f',[x0,xf],y0);
%
k=0:1:4;
k1=k.^2-k;
%
plot(x,y(:,1),'r',k,k1,'k*') % nur die Funktion wird gezeichnet
%          |> 1 die Funktion , 2 die 1. Ableitung ...