function cleni = obratnoLeksikografskoVrstice(meje)
% cleni = obratnoLeksikografskoRekurzijaVrstice(meje)
% izracuna vse multiindekse (i1, ... , iN),
% kjer je 1 <= i_j <= meje(j). Ti multiindeksi so podani
% v obratnem leksikografskem vrstnem redu, tako da je
% cleni(:, i) i-ti clen zaporedja
%
% Matriko cleni zgradimo po vrsticah.

n = length(meje);
dolzine = ones(n, 1);
kopije = ones(n, 1);
for i = 1:n-1
    dolzine(i + 1) = dolzine(i) * meje(i);
    kopije(n - i) = meje(n - i + 1) * kopije(n - i + 1);
end

nClenov = dolzine(n) * meje(n);
cleni = zeros(n, nClenov);
for i = 1:n
    posamezni = 1:meje(i);
    e1 = ones(1, dolzine(i));
    e2 = ones(1, kopije(i));
    cleni(i, :) = kron(e2, kron(posamezni, e1));
end


end