function mr = SARIMA(p,d,q,P,D,Q,s)
%              VEKTOR RADU MODELU TYPU SARIMA(p,d,q,P,D,Q,s)
%     (suitable for NAG Foundation toolbox gateway routines 'NAGxxxxx')
% VOLANI: mr = SARIMA(p,d,q,P,D,Q,s)
% VSTUP:
% p ... rad nesezonni AR casti modelu (p>=0, cele cislo)
% d ... rad nesezonniho diferencovani (d>=0, cele cislo)
% q ... rad nesezonni MA casti modelu (q>=0, cele cislo)
% P ... rad sezonni AR casti modelu (P>=0, cele cislo)
% D ... rad sezonniho diferencovani (D>=0, cele cislo)
% Q ... rad sezonni MA casti modelu (Q>=0, cele cislo)
% s ... perioda (pocet bodu) sezonni komponenty (s>=0, cele cislo)
% Podminky korektnosti (nejsou kontrolovany):
% p,d,q,P,D,Q,s>=0; p+q+P+Q>0; s~=1; s==0 => P+D+Q=0; s>1 => P+D+Q>0.
%
% VYSTUP:
% mr=[p,d,q,P,D,Q,s] ... vektor radu modelu SARIMA(p,d,q,P,D,Q,s).

% (C) 1999, V. Vesely, Masaryk University of Brno (Czech Republic)
%
error(nargchk(7,7,nargin));
%
mr=[p,d,q,P,D,Q,s];
