wolffd@0: function ss = set(s,varargin)
wolffd@0: % SET Set properties from the MIRstruct object and return the value
wolffd@0: 
wolffd@0: propertyArgIn = varargin;
wolffd@0: f = s.fields;
wolffd@0: d = s.data;
wolffd@0: t = s.tmp;
wolffd@0: st = s.stat;
wolffd@0: des = mirdesign(s);
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 'Fields'
wolffd@0:             f = val;
wolffd@0:         case 'Data'
wolffd@0:             d = val;
wolffd@0:         case 'Tmp'
wolffd@0:             t = val;
wolffd@0:         case 'Stat'
wolffd@0:             st = val;
wolffd@0:         otherwise
wolffd@0:             des = set(des,prop,val);
wolffd@0:     end
wolffd@0: end
wolffd@0: ss.fields = f;
wolffd@0: ss.data = d;
wolffd@0: ss.tmp = t;
wolffd@0: ss.stat = st;
wolffd@0: ss = class(ss,'mirstruct',des);