dane=read('c:\laborat\mmt\wypadki01.txt',16,13);
ndane=[];
for i=1:13
  A=dane(:,i);  
  A=(A-min(A))/(max(A)-min(A));
  ndane=[ndane A];
end
Zucz=[ndane(1:12,1:10)];
Tucz=ndane(1:12,11:13);

Zwal=[ndane(13:16,1:10)];
Twal=ndane(13:16,11:13);

N=[10 70 50 70 3];
W=ann_FF_init(N);
lp=[0.1 0.05 0.5 0.1];
Te=200;
[W,sW]=ann_FF_Mom_online(Zucz',Tucz',N,W,lp,Te);

Y1=ann_FF_run(Zucz',N,W);
blad=(Y1-Tucz')
bladucz=sum(blad.^2)/(12*3)

Y2=ann_FF_run(Zwal',N,W);
blad=(Y2-Twal')
bladwal=sum(blad.^2)/(4*3)

//Y3=ann_FF_run(Ztest',N,W)
//Y(16,1)