Daniel@0: function val = get_params(pot, name)
Daniel@0: % GET_PARAMS Accessor function for a field (dpot)
Daniel@0: % val = get_params(pot, name)
Daniel@0: %
Daniel@0: % e.g., get_params(pot, 'table') or 'domain'
Daniel@0: 
Daniel@0: switch name
Daniel@0:  case 'table', val = pot.T;
Daniel@0:  case 'domain', val = pot.domain;
Daniel@0:  otherwise,
Daniel@0:   error(['invalid field name ' name]);
Daniel@0: end
Daniel@0: