0001
0002
0003
0004
0005
0006 classdef continuous_state
0007 properties
0008 descriptor='';
0009 initst = NaN;
0010 lower = NaN;
0011 upper = NaN;
0012 end
0013
0014 methods
0015 function [csv]=continuous_state(varargin)
0016
0017 switch nargin
0018
0019
0020
0021 case 0
0022
0023
0024
0025 case 1
0026 if isa(varargin{1},'continuous_state')
0027 csv=varargin{1};
0028 else
0029 error('Object ''%s'' is a ''%s'' class object, not ''%s''.',...
0030 inputname(1),class(varargin{1}),'continuous_state');
0031 end
0032
0033
0034
0035 otherwise
0036 csv.descriptor=varargin{1};
0037 csv.initst =varargin{2};
0038 if (nargin >= 3)
0039 csv.lower =varargin{3};
0040 if (nargin >= 4)
0041 csv.upper =varargin{4};
0042 if (nargin > 4)
0043 warning('continuous_state:extra_arg',...
0044 'Extra arguments for object of class ''%s''.',...
0045 class(csv));
0046 end
0047 end
0048 end
0049 end
0050
0051 end
0052 function [desc] =dvar_desc(csv)
0053 desc=cell(size(csv));
0054 for i=1:numel(csv)
0055 desc(i)=cellstr(csv(i).descriptor);
0056 end
0057 desc=allempty(desc);
0058 end
0059 function [initpt]=dvar_initpt(csv)
0060 initpt=[];
0061 end
0062 function [lower] =dvar_lower(csv)
0063 lower=zeros(size(csv));
0064 for i=1:numel(csv)
0065 lower(i)=csv(i).lower;
0066 end
0067 lower=allnan(lower);
0068 end
0069 function [upper] =dvar_upper(csv)
0070 upper=zeros(size(csv));
0071 for i=1:numel(csv)
0072 upper(i)=csv(i).upper;
0073 end
0074 upper=allnan(upper);
0075 end
0076 function [mean] =dvar_mean(csv)
0077 mean=[];
0078 end
0079 function [stddev]=dvar_stddev(csv)
0080 stddev=[];
0081 end
0082 function [initst]=dvar_initst(csv)
0083 initst=zeros(size(csv));
0084 for i=1:numel(csv)
0085 initst(i)=csv(i).initst;
0086 end
0087 end
0088 end
0089 end