wolffd@0: function engine = update_engine(engine, newCPDs)
wolffd@0: % UPDATE_ENGINE Update the engine to take into account the new parameters (kalman)
wolffd@0: % engine = update_engine(engine, newCPDs)
wolffd@0: 
wolffd@0: engine.inf_engine = update_engine(engine.inf_engine, newCPDs);
wolffd@0: [engine.trans_mat, engine.trans_cov, engine.obs_mat, engine.obs_cov, engine.init_state, engine.init_cov] = ...
wolffd@0:     dbn_to_lds(bnet_from_engine(engine));
wolffd@0: 
wolffd@0: