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