wolffd@0: function disp_map_hhmm(bnet)
wolffd@0: 
wolffd@0: eclass = bnet.equiv_class;
wolffd@0: U = 1; A = 2; C = 3; F = 4;
wolffd@0: 
wolffd@0: S = struct(bnet.CPD{eclass(A,2)});
wolffd@0: disp('abstract trans')
wolffd@0: dispcpt(S.transprob)
wolffd@0: 
wolffd@0: S = struct(bnet.CPD{eclass(C,2)});
wolffd@0: disp('concrete trans for go left') % UAC AC
wolffd@0: dispcpt(squeeze(S.transprob(1,:,:,:,:)))
wolffd@0: