wolffd@0: function marginal = dbn_marginal_from_bel(engine, i)
wolffd@0: % DBN_MARGINAL_FROM_BEL Compute the marginal on a node given the current belief state (bk_ff_hmm)
wolffd@0: % marginal = dbn_marginal_from_bel(engine, i)
wolffd@0: 
wolffd@0: marginal = pot_to_marginal(engine.bel_marginals{i});