function p=hostanparam(p,aux)
p.hopf.aux=[];
p.hopf.flcheck=1;
p.hopf.indini=0;
p.hopf.nfloq=20;
p.hopf.ind=-1;
p.hopf.tl=21;
p.hopf.fltol=1e-6;
p.hopf.pcheck=1;
p.hopf.nqh=0;
p.hopf.xif=10;
p.hopf.qfac=1;
p.hopf.tw=0.5;
p.hopf.scf=1;
p.hopf.sec=0;
p.hopf.pcfac=1;
p.hopf.qw=0.1;
p.hopf.y0dsw=2;
p.hopf.bisec=5;
p.fuha.ufu=@hostanufu; p.fuha.headfu=@hostanheadfu;
if nargin>1
if isfield(aux,'hoaux'); p.hopf.aux=aux.hoaux; end;
if isfield(aux,'tl'); p.hopf.tl=aux.tl; end;
if isfield(aux,'tw'); p.hopf.tw=aux.tw; end;
if isfield(aux,'nqh'); p.hopf.nqh=aux.nqh; end;
if isfield(aux,'qw'); p.hopf.qw=aux.qw; end
if isfield(aux,'qfac'); p.hopf.qfac=aux.qfac; end
if isfield(aux,'xif'); p.hopf.xif=aux.xif; end;
if isfield(aux,'pcfac'); p.hopf.pcfac=aux.pcfac; end;
if isfield(aux,'y0dsw'); p.hopf.y0dsw=aux.y0dsw; end;
if isfield(aux,'qfh'); p.hopf.qfh=aux.qfh; end
if isfield(aux,'qfhder'); p.hopf.qfhder=aux.qfhder; end
end