function []=startvan(n)
% ======================================================================
% Startroutine fuer das CG-Verfahren mit vander.m
%	S.F.
% ----------------------------------------------------------------------
b=-vander(ones(n,1));

amalvname='vander'; 
% Als Startvektor verwenden wir den Nullvektor.
x = zeros(n,1);

[lsg,k,nfc] = cg(x,amalvname,b);

disp(sprintf('Der Lösungsvektor ist '))
lsg

disp(sprintf('%s%d','Anzahl der Iterationen : ',k ))
disp(sprintf('%s%d','Anzahl der F-Auswertungen : ',nfc ))

