function M = elimMatrix (A, k)
  %%%% input ellenõrzése?!
  [n,m] = size(A);
  
  %%% Eliminációs mátrix generálása 
  M = eye(n,n);
  for l = k+1:n
    M(l,k) = -A(l,k)/A(k,k);      % ???!!!
  endfor
  
endfunction   