


SUBSASGN define index assignment for for tsdata properties.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: SUBSASGN define index assignment for tsdata properties.
EXAMPLES: All possible assignments are possible.
VERSION: $Id: subsasgn.m,v 1.3 2007/11/23 12:11:08 ingo Exp $
HISTORY: 31-01-07 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function A = subsasgn(A, S, B) 0002 % SUBSASGN define index assignment for for tsdata properties. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: SUBSASGN define index assignment for tsdata properties. 0007 % 0008 % EXAMPLES: All possible assignments are possible. 0009 % 0010 % VERSION: $Id: subsasgn.m,v 1.3 2007/11/23 12:11:08 ingo Exp $ 0011 % 0012 % HISTORY: 31-01-07 M Hewitson 0013 % Creation 0014 % 0015 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0016 VERSION = '$Id: subsasgn.m,v 1.3 2007/11/23 12:11:08 ingo Exp $'; 0017 0018 % Check if this is a call for parameters 0019 if nargin == 2 0020 if isa(A, 'tsdata') && ischar(S) 0021 in = char(S); 0022 if strcmp(in, 'Params') 0023 A = plist; 0024 return 0025 elseif strcmp(in, 'Version') 0026 A = VERSION; 0027 return 0028 end 0029 end 0030 end 0031 0032 0033 A = builtin ('subsasgn', A, S, B); 0034 0035 0036 % END