Home > classes > @cdata > subsasgn.m

subsasgn

PURPOSE ^

SUBSASGN define index assignment for fsdata properties.

SYNOPSIS ^

function A = subsasgn(A, S, B)

DESCRIPTION ^

 SUBSASGN define index assignment for fsdata properties.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

 DESCRIPTION: SUBSASGN define index assignment for fsdata
              properties.

 EXAMPLES:    All possible assignment are possible.

 VERSION:     $Id: subsasgn.m,v 1.7 2008/02/25 18:06:31 ingo Exp $

 HISTORY:     31-01-07 M Hewitson
                 Creation

 $Id: subsasgn.m,v 1.7 2008/02/25 18:06:31 ingo Exp $

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function A = subsasgn(A, S, B)
0002 % SUBSASGN define index assignment for fsdata properties.
0003 %
0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0005 %
0006 % DESCRIPTION: SUBSASGN define index assignment for fsdata
0007 %              properties.
0008 %
0009 % EXAMPLES:    All possible assignment are possible.
0010 %
0011 % VERSION:     $Id: subsasgn.m,v 1.7 2008/02/25 18:06:31 ingo Exp $
0012 %
0013 % HISTORY:     31-01-07 M Hewitson
0014 %                 Creation
0015 %
0016 % $Id: subsasgn.m,v 1.7 2008/02/25 18:06:31 ingo Exp $
0017 
0018 
0019 % Check if this is a call for parameters
0020 if nargin == 2
0021   if isa(A, 'cdata') && ischar(S)
0022     in = char(S);
0023     if strcmp(in, 'Params')
0024       A = plist;
0025       return
0026     elseif strcmp(in, 'Version')
0027       VERSION  = '$Id: subsasgn.m,v 1.7 2008/02/25 18:06:31 ingo Exp $';
0028       A = VERSION;
0029       return
0030     elseif strcmp(in, 'Category')
0031       CATEGORY = 'Internal';
0032       ts = CATEGORY;
0033       return
0034     end
0035   end
0036 end
0037 
0038 if isempty(A)
0039   A = cdata();
0040 end
0041 
0042 A = builtin ('subsasgn', A, S, B);

Generated on Mon 31-Mar-2008 13:54:54 by m2html © 2003