Mercurial > hg > camir-aes2014
annotate toolboxes/MIRtoolbox1.3.2/MIRToolbox/@mirspectrum/set.m @ 0:e9a9cd732c1e tip
first hg version after svn
author | wolffd |
---|---|
date | Tue, 10 Feb 2015 15:05:51 +0000 |
parents | |
children |
rev | line source |
---|---|
wolffd@0 | 1 function ss = set(s,varargin) |
wolffd@0 | 2 % SET Set properties for the MIRspectrum object |
wolffd@0 | 3 % and return the updated object |
wolffd@0 | 4 |
wolffd@0 | 5 propertyArgIn = varargin; |
wolffd@0 | 6 ph = s.phase; |
wolffd@0 | 7 log = s.log; |
wolffd@0 | 8 pow = s.pow; |
wolffd@0 | 9 xs = s.xscale; |
wolffd@0 | 10 d = mirdata(s); |
wolffd@0 | 11 d = set(d,'Title',get(s,'Title'),'Abs',get(s,'Abs'),'Ord',get(s,'Ord')); |
wolffd@0 | 12 while length(propertyArgIn) >= 2, |
wolffd@0 | 13 prop = propertyArgIn{1}; |
wolffd@0 | 14 val = propertyArgIn{2}; |
wolffd@0 | 15 propertyArgIn = propertyArgIn(3:end); |
wolffd@0 | 16 switch prop |
wolffd@0 | 17 case 'Magnitude' |
wolffd@0 | 18 d = set(d,'Data',val); |
wolffd@0 | 19 case 'Frequency' |
wolffd@0 | 20 d = set(d,'Pos',val); |
wolffd@0 | 21 case 'Phase' |
wolffd@0 | 22 ph = val; |
wolffd@0 | 23 case 'log' |
wolffd@0 | 24 log = val; |
wolffd@0 | 25 case 'XScale' |
wolffd@0 | 26 xs = val; |
wolffd@0 | 27 case 'Power' |
wolffd@0 | 28 pow = val; |
wolffd@0 | 29 otherwise |
wolffd@0 | 30 d = set(d,prop,val); |
wolffd@0 | 31 end |
wolffd@0 | 32 end |
wolffd@0 | 33 ss.phase = ph; |
wolffd@0 | 34 ss.log = log; |
wolffd@0 | 35 ss.xscale = xs; |
wolffd@0 | 36 ss.pow = pow; |
wolffd@0 | 37 ss = class(ss,'mirspectrum',d); |