From 69aaac1fb8f03b38af036d83a7ce9c6d00ea124d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?= Date: Mon, 18 Mar 2013 08:23:20 +0100 Subject: [PATCH] Added unitary test for @dynSeries/ydiff. --- matlab/@dynSeries/ydiff.m | 30 ++++++++++++++++++++++++++---- 1 file changed, 26 insertions(+), 4 deletions(-) diff --git a/matlab/@dynSeries/ydiff.m b/matlab/@dynSeries/ydiff.m index c9329c913..5c8972ffd 100644 --- a/matlab/@dynSeries/ydiff.m +++ b/matlab/@dynSeries/ydiff.m @@ -23,7 +23,7 @@ function us = ydiff(ts) %! @end deftypefn %@eod: -% Copyright (C) 2012 Dynare Team +% Copyright (C) 2012, 2013 Dynare Team % % This file is part of Dynare. % @@ -40,8 +40,6 @@ function us = ydiff(ts) % You should have received a copy of the GNU General Public License % along with Dynare. If not, see . -% AUTHOR(S) stephane DOT adjemian AT univ DASH lemans DOT fr - us = ts; switch ts.freq @@ -147,4 +145,28 @@ end %$ end %$ %$ T = all(t); -%@eof:3 \ No newline at end of file +%@eof:3 + +%@test:4 +%$ t = zeros(4,1); +%$ +%$ try +%$ data = transpose(1:100); +%$ ts = dynSeries(data,1950,{'A1'},{'A_1'}); +%$ ts = ts.ydiff; +%$ t(1) = 1; +%$ catch +%$ t = 0; +%$ end +%$ +%$ +%$ if length(t)>1 +%$ DATA = NaN(1,ts.vobs); +%$ DATA = [DATA; ones(ts.nobs-1,ts.vobs)]; +%$ t(2) = dyn_assert(ts.data,DATA); +%$ t(3) = dyn_assert(ts.name{1},['YDIFF_A1']); +%$ t(4) = dyn_assert(ts.tex{1},['\\Delta A_1']); +%$ end +%$ +%$ T = all(t); +%@eof:4