www.pudn.com > huffman.rar > huffman_test1.m

function huffman_test1 
% HUFFMAN_TEST1 
% This is a simple test to have a code profile of the functions 
 
 
%   $Author: Giuseppe Ridino' $ 
%   $Revision: 1.0 $  $Date: 02-Jul-2004 16:47:25 $ 
 
 
profile clear 
profile on -history 
 
tic 
 
data = uint8(256*sin(1:100000)); 
[zipped,info] = norm2huff(data); 
unzipped = huff2norm(zipped,info); 
 
toc 
 
unzipped = uint8(unzipped); 
ok = isequal(data,unzipped) 
 
profile off 
profile report