Added unitary test.

time-shift
Stéphane Adjemian (Charybdis) 2013-10-08 17:21:17 +02:00
parent 2967328bb0
commit 90d8efd147
1 changed files with 22 additions and 1 deletions

View File

@ -600,4 +600,25 @@ end
%$ end
%$
%$ T = all(t);
%@eof:13
%@eof:13
%@test:14
%$ try
%$ data = transpose(0:1:50);
%$ ts = dynSeries(data,'1950Q1');
%$ a = ts.lag;
%$ b = ts.lead;
%$ c = ts(-1);
%$ d = ts(1);
%$ t(1) = 1;
%$ catch
%$ t(1) = 0;
%$ end
%$
%$ if t(1)>1
%$ t(2) = (a==c);
%$ t(3) = (b==d);
%$ end
%$
%$ T = all(t);
%@eof:14