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

Rewrote more compactly @dates/max function.

time-shift
Stéphane Adjemian (Charybdis) 2013-11-04 19:21:00 +01:00
parent 8568292fcd
commit 88389316fa
1 changed files with 6 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
matlab/@dates/max.m
View File

@ -21,41 +21,20 @@ function C = max(varargin)
switch nargin
case 1
A = varargin{1};
switch length(A)
switch length(varargin{1})
case 0
C= dates();
case 1
C = A;
C = varargin{1};
otherwise
tmp = sortrows(A.time);
tmp = sortrows(varargin{1}.time);
C = dates();
C.freq = A.freq;
C.freq = varargin{1}.freq;
C.ndat = 1;
C.time = tmp(A.ndat,:);
C.time = tmp(varargin{1}.ndat,:);
end
case 2
A = varargin{1};
if ~isa(A,'dates')
error('dates::max: All inputs must be dates objects!')
end
B = varargin{2};
if ~isa(B,'dates')
error('dates::max: All inputs must be dates objects!')
end
C = max(A+B);
otherwise
if ~isa(varargin{1},'dates')
error('dates::max: All inputs must be dates objects!')
end
A = varargin{1};
for i=2:nargin
if ~isa(varargin{i},'dates')
error('dates::max: All inputs must be dates objects!')
end
A = A + varargin{i};
end
C = max(A);
C = max(horzcat(varargin{:}));
end
%@test:1