function acl = huffman_average_code_length(T,p)
	N = numel(p);
	acl = 0;
	for n = 1:N
		acl = acl + p(n) * numel( huffman_encode(T,n) );
	end
end
