wolffd@0: function aa = set(a,varargin)
wolffd@0: % SET Set properties for the MIRautocor object
wolffd@0: % and return the updated object
wolffd@0: 
wolffd@0: propertyArgIn = varargin;
wolffd@0: f = a.freq;
wolffd@0: s = a.ofspectrum;
wolffd@0: w = a.window;
wolffd@0: nw = a.normalwindow;
wolffd@0: d = mirdata(a);
wolffd@0: d = set(d,'Title',get(a,'Title'),'Abs',get(a,'Abs'),'Ord',get(a,'Ord'));
wolffd@0: while length(propertyArgIn) >= 2,
wolffd@0:    prop = propertyArgIn{1};
wolffd@0:    val = propertyArgIn{2};
wolffd@0:    propertyArgIn = propertyArgIn(3:end);
wolffd@0:    switch prop
wolffd@0:        case 'Coeff'
wolffd@0:            d = set(d,'Data',val);
wolffd@0:        case 'Delay'
wolffd@0:            d = set(d,'Pos',val);
wolffd@0:        case 'FreqDomain'
wolffd@0:            f = val;
wolffd@0:        case 'OfSpectrum'
wolffd@0:            s = val;
wolffd@0:        case 'Window'
wolffd@0:            w = val;
wolffd@0:        case 'LowRemoved'
wolffd@0:            lr = val;
wolffd@0:        otherwise
wolffd@0:            d = set(d,prop,val);
wolffd@0:    end
wolffd@0: end
wolffd@0: aa.freq = f;
wolffd@0: aa.ofspectrum = s;
wolffd@0: aa.window = w;
wolffd@0: aa.normalwindow = nw;
wolffd@0: aa = class(aa,'mirautocor',d);