Daniel@0: function pp = set(p,varargin)
Daniel@0: % SET Set properties for the MIRpitch object
Daniel@0: % and return the updated object
Daniel@0: 
Daniel@0: propertyArgIn = varargin;
Daniel@0: a = p.amplitude;
Daniel@0: s = mirscalar(p);
Daniel@0: while length(propertyArgIn) >= 2,
Daniel@0:    prop = propertyArgIn{1};
Daniel@0:    val = propertyArgIn{2};
Daniel@0:    propertyArgIn = propertyArgIn(3:end);
Daniel@0:    switch prop
Daniel@0:        case 'Amplitude'
Daniel@0:            a = val;
Daniel@0:        otherwise
Daniel@0:            s = set(s,prop,val);
Daniel@0:    end
Daniel@0: end
Daniel@0: pp.amplitude = a;
Daniel@0: pp = class(pp,'mirpitch',s);