stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed bug and added unitary tests.

time-shift
Stéphane Adjemian (Charybdis) 2014-07-02 16:08:08 +02:00
parent 1b36d75947
commit 0c98ba67f6
1 changed files with 25 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
matlab/@dates/dates.m
View File

@ -112,8 +112,8 @@ if isequal(nargin,3) && isfreq(varargin{1})
else
dd.freq = varargin{1};
end
if (isnumeric(varargin{2}) && isvector(varargin{2}) && isint(varargin{2}))
if isnumeric(varargin{3}) && isvector(varargin{3}) && isint(varargin{3})
if (isnumeric(varargin{2}) && isvector(varargin{2}) && all(isint(varargin{2})))
if isnumeric(varargin{3}) && isvector(varargin{3}) && all(isint(varargin{3}))
if all(varargin{3}>=1) && all(varargin{3}<=dd.freq)
dd.time = [varargin{2}(:), varargin{3}(:)];
dd.ndat = size(dd.time,1);
@ -286,4 +286,26 @@ error('dates::dates: Wrong calling sequence!')
%$ t(3) = dyn_assert(d.time,[1950 2]);
%$ end
%$ T = all(t);
%@eof:6
%@eof:6
%@test:7
%$ try
%$ B = dates(4,[1950; 1950], [1; 2]);
%$ t = 1;
%$ catch
%$ t = 0;
%$ end
%$
%$ T = all(t);
%@eof:7
%@test:8
%$ try
%$ B = dates(4,[1950, 1950], [1, 2]);
%$ t = 1;
%$ catch
%$ t = 0;
%$ end
%$
%$ T = all(t);
%@eof:8