
function A = mapping(n)
% 
% Funkcija za izracunavanje Mortonove matrice za odredjivanje
% rastera skeniranja
%
% Autori  : Davor Zivko i Dario Zrno
% Projekt : Kompresija slike EZW algoritmom
% Kolegij : Napredne metode digitalne obrade signala, sk.god. 2004/05
% 
% function A = mapping(n)
%
% Ulaz funkcije:
%         n................... 
% 
% Izlaz funkcije:
%         A................... Mortonova matrica
%

if n == 2
    A = [1 2; 3 4];
else
    B = mapping(n/2);
    A = [B B+(n/2)^2; B+(n/2)^2*2 B+(n/2)^2*3];
end