%Teil 5 Sanger

wsan=rand(10,10304);
y=zeros(1,10);

for l=1:lmax
    for t=1:400
        for i=1:10
            for j=1:10304
                for number=1:10
                   y(number)=X(t,:)*wsan(number,:)';
                end
                wsan(i,j)=alpha*(1-(l-1)/lmax)*y(j)*(X(t,i)-wsan(i,:))*y;
            end
        end
    end
end