Daniel@0: function engine = update_engine(engine, newCPDs)
Daniel@0: % UPDATE_ENGINE Update the engine to take into account the new parameters (bk)
Daniel@0: % engine = update_engine(engine, newCPDs)
Daniel@0: 
Daniel@0: engine.inf_engine = update_engine(engine.inf_engine, newCPDs);
Daniel@0: engine.sub_engine = update_engine(engine.sub_engine, newCPDs);
Daniel@0: 
Daniel@0: bnet = bnet_from_engine(engine);
Daniel@0: eclass1 = bnet.equiv_class(:,1);
Daniel@0: engine.sub_engine1 = update_engine(engine.sub_engine1, newCPDs(1:max(eclass1)));
Daniel@0: