wolffd@0: function mnet = mk_mnet(graph, node_sizes, cliques, potentials)
wolffd@0: % MK_MNET Make a Markov network (Markov Random Field)
wolffd@0: %
wolffd@0: % mnet = mk_mnet(adj_mat, node_sizes, cliques, potentials)
wolffd@0: %
wolffd@0: % cliques{i} is a list of the nodes in clq i
wolffd@0: % potentials{i} is a dpot object corresponding to the potential for clique i
wolffd@0: %
wolffd@0: 
wolffd@0: mnet.markov_net = 1;
wolffd@0: mnet.graph = graph;
wolffd@0: mnet.node_sizes = node_sizes;
wolffd@0: mnet.user_cliques = cliques;
wolffd@0: mnet.user_potentials = potentials;