www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xregcovariance/gls_clist.m

    function [out,Names] = gls_clist(c,n,Ts)
%GLS_CLIST list of correlation functions available
%
% [out,Names] = gls_clist(c,n,Ts)

%  Copyright 2000-2011 The MathWorks, Inc. and Ford Global Technologies, Inc.

cmodels= {'','ma','ar','ar'};
Names = {'','MA(1)','AR(1)','AR(2)'};
    
if nargin==1
   n= find( strncmp( c.cfunc,cmodels,length(c.cfunc) ) );
   if isempty(c.cfunc) || isempty(n)
      n=1;
   elseif length(n)>1 && strcmp(c.cfunc,'ar')
      n= 2+length(c.cparam);
   end
   out= n(1);
else
   c.cfunc= cmodels{n};
   
   % default function values
   cparams= {[],0,0,[0 0]};
   c.cparam= cparams{n};
   if ~isempty(c.cfunc)
      if nargin>2 
         c.Ts= Ts;
      else
         c.Ts=1;
      end
   else
      c.Ts=0;
   end
   out= c;
end