wolffd@0: function m = pot_to_marginal(pot)
wolffd@0: % POT_TO_MARGINAL Convert a upot to a structure.
wolffd@0: % m = pot_to_marginal(pot)
wolffd@0: 
wolffd@0: m.domain = pot.domain;
wolffd@0: m.T = pot.p;
wolffd@0: m.U = pot.u;
wolffd@0: 
wolffd@0: