function?f=avl（pc）;%c為費(fèi)諾編碼輸出序列
f=0;
n=length（p）;
for?i=1:n
????f=f+p（i）.*length（c{i}）;
end

?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----

?????文件?????????79??2009-11-17?00:47??h.m

?????文件???????1006??2009-11-17?12:59??huffman.m

?????文件????????740??2009-11-16?22:39??fano.m

?????文件????????107??2009-11-17?12:49??avl.m

-----------?---------??----------?-----??----

?????????????????1932????????????????????4