%REIZ
%
N=4;
for m=1:5
  fprintf('                          m=%1.0f\n',m)
  ab=r_Enu(N,m);
  for n=2:N
    xw=gauss(n,ab)
    fprintf('\n')
  end
end
