%Test
clear all
n=10
A1=randn(n,n);
A=A1'*A1;
b=rand(n,1);
c=rand(1);
epsi=10^-6;
x=SteilsterAbstieg(A,b,c,epsi);

xopt=-A\b;
norm(x-xopt)