Code covered by the BSD License  

Highlights from
Logiciels temps réel

Logiciels temps réel

by

 

Real-time software concerning the domains of the signal processing, feedback and regulation

[g,t]=reponse_impulsionnelle(x,DEF)
function [g,t]=reponse_impulsionnelle(x,DEF)


e=x.signals.values(:,1);
cxy=corcirc(x.signals.values(:,2),e,DEF(4));
cxy=cxy-DEF(11)*mean(e);
g=cxy*DEF(10)/DEF(7)^2;
t=x.time;
t0=t(1);
t=t-t0;
figure(3)
set(gcf,'position',ecran)
set(gcf,'color','w')
plot(t,g,'b')
grid on
test=[];
hgcf=get(gcf,'child');
lgcf=length(hgcf);
for kgcf=1:1:lgcf
    test=[test;strcmp(get(hgcf(kgcf),'type'),'uimenu')];
end
if ~any(test)
    h=uimenu('label','Identification',...
        'foregroundcolor','r',...
        'callback','h_D=choix_duree_calcul_T;');
end;

Contact us