Commit 4f570b17 authored by Stéphane Adjemian's avatar Stéphane Adjemian
Browse files

Cosmetic changes.

parent ef59f538
......@@ -33,6 +33,6 @@ end
%$ catch
%$ t(1) = false;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -404,14 +404,14 @@ fclose(fid);
%$ o.forecast('maxlead',18,'probability',0.95,'save','(fct fvr)');
%$ o.run(); % necessary to invoke alphanumeric "basename"
%$ o.print();
%$
%$
%$ text = fileread(sprintf('%$s.spc',o.results.name));
%$ comm = o.commands;
%$
%$
%$ for i = 1:numel(comm)
%$ ex(i,1) = ~isempty(strfind(text,[comm{i} ' {']));
%$ end
%$
%$
%$ if all(ex)
%$ t(1) = true;
%$ o.clean();
......@@ -419,6 +419,6 @@ fclose(fid);
%$ catch
%$ t(1) = false;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -19,30 +19,30 @@ error('Members of x13 class are private')
%@test:1
%$ t = zeros(3,1);
%$
%$
%$ y = dseries(rand(100,1),'1999M1');
%$ o = x13(y);
%$
%$
%$ try
%$ o.commands = {'yes','no','maybe'};
%$ t(1) = false;
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ try
%$ o.results = 'Perverse string';
%$ t(2) = false;
%$ catch
%$ t(2) = true;
%$ end
%$
%$
%$ try
%$ o.y = dseries(rand(100,1));
%$ t(3) = false;
%$ catch
%$ t(3) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -98,28 +98,28 @@ end
%@test:1
%$ t = zeros(1,5);
%$ o = x13();
%$
%$
%$ try
%$ o(arima);
%$ t(1) = false;
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ try
%$ o.unicorn;
%$ t(2) = false;
%$ catch
%$ t(2) = true;
%$ end
%$
%$
%$ try
%$ o.x11('onearg','onevalue','twoargs');
%$ t(3) = false;
%$ catch
%$ t(3) = true;
%$ end
%$
%$
%$ try
%$ o.x11('unicorn','yes please');
%$ o.x11.unicorn;
......@@ -127,13 +127,13 @@ end
%$ catch
%$ t(4) = true;
%$ end
%$
%$
%$ try
%$ o.print.unicorn;
%$ t(5) = false;
%$ catch
%$ t(5) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -121,7 +121,7 @@ end
end
%@test:1
%$
%$
%$ try
%$ series = dseries(rand(100,2),'1999M1');
%$ o = x13(series);
......@@ -129,7 +129,7 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
......@@ -141,7 +141,7 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:2
......@@ -154,6 +154,6 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:3
\ No newline at end of file
......@@ -20,7 +20,7 @@ function checkcommandcompatibility(o, comm) % --*-- Unitary tests --*--
switch comm
case 'arima'
if ismember('automdl', o.commands)
error('x13:arima: ARIMA command is not compatible with AUTOMDL command!')
error('x13:arima: ARIMA command is not compatible with AUTOMDL command!')
elseif ismember('pickmdl', o.commands)
error('x13:arima: ARIMA command is not compatible with PICKMDL command!')
end
......@@ -34,31 +34,31 @@ switch comm
if ismember('arima', o.commands)
error('x13:pickmdl: PICKMDL command is not compatible with ARIMA command!')
elseif ismember('automdl', o.commands)
error('x13:pickmdl: PICKMDL command is not compatible with AUTOMDL command!')
end
error('x13:pickmdl: PICKMDL command is not compatible with AUTOMDL command!')
end
otherwise
end
%@test:1
%$ t = zeros(2,1);
%$
%$
%$ series = dseries(rand(100,1),'1999M1');
%$ o = x13(series);
%$ o.arima('save','(d11)');
%$
%$
%$ try
%$ o.automdl('savelog','amd');
%$ t(1) = false;
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ try
%$ o.pickmdl('savelog','amd');
%$ t(2) = false;
%$ catch
%$ t(2) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -34,36 +34,36 @@ if ~isempty(o.estimate.file)
error('Command AUTOMDL not compatible with ESTIMATE.file option!');
elseif ismember('pickmdl',o.commands)
error('Command PICKMDL not compatible with ESTIMATE.file option!');
end
end
end
%@test:1
%$ t = zeros(3,1);
%$
%$
%$ series = dseries(rand(100,1),'1999M1');
%$ o = x13(series);
%$ o.estimate('file','test');
%$
%$
%$ try
%$ o.arima('model','(1 0 1)');
%$ t(1) = false;
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ try
%$ o.pickmdl('savelog','amd');
%$ t(2) = false;
%$ catch
%$ t(2) = true;
%$ end
%$
%$
%$ try
%$ o.regression('b',0.9);
%$ t(3) = false;
%$ catch
%$ t(3) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -86,13 +86,13 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
%@test:2
%$ b = isoption('arima','ar');
%$ c = ~isoption('arima','unicorn');
%$
%$
%$ T = all([b;c]);
%@eof:2
\ No newline at end of file
......@@ -45,7 +45,7 @@ end
%@test:1
%$ fid = fopen('test.spc', 'w');
%$
%$
%$ try
%$ series = dseries(rand(100,1),'1999M1');
%$ o = x13(series);
......@@ -56,6 +56,6 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -49,7 +49,7 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
......@@ -63,7 +63,7 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:2
......@@ -77,6 +77,6 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:3
\ No newline at end of file
......@@ -40,6 +40,6 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
......@@ -90,6 +90,6 @@ end
%$ catch
%$ t(1) = true;
%$ end
%$
%$
%$ T = all(t);
%@eof:1
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment