wolffd@0: function val = get_field(CPD, name)
wolffd@0: % GET_PARAMS Get the parameters (fields) for a tabular_CPD object
wolffd@0: % val = get_params(CPD, name)
wolffd@0: %
wolffd@0: % The following fields can be accessed
wolffd@0: %
wolffd@0: % cpt, counts
wolffd@0: %
wolffd@0: % e.g., CPT = get_params(CPD, 'cpt')
wolffd@0: 
wolffd@0: switch name
wolffd@0:  case 'cpt',      val = CPD.CPT;
wolffd@0:  case 'counts',      val = CPD.counts;
wolffd@0:  otherwise,
wolffd@0:   error(['invalid argument name ' name]);
wolffd@0: end