mortonscan.asv

改进版ezw编码

function [scanlist,flaglist]=mortonscan(Mat)
st=cputime;
% global row col
[row,col]=size(Mat);

% Normalization of flaglist

for r=1:row
    for c=1:col
        flaglist(r,c)='Z';
    end
end

matlist=mat2list(Mat);
scanorder=listorder(row,col,1,1);
scanlist=[];
for i=1:row*col
    scanlist=[scanlist;i scanorder(i,:) matlist(i)];
end

et=cputime-st