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

nettoyage.m
function nettoyage
h=get(gcf,'child');
hk=[];
for k=1:1:length(h)
    if strcmp(get(h(k),'type'),'axes')
        hk=[hk;h(k)];
    end;
end;
hka=get(hk,'child');
hkt=[];
for k=1:1:length(hka)
    if strcmp(get(hka(k),'type'),'text')
        hkt=[hkt;hka(k)];
    end;
end;
hkt2=[];
for kk=1:1:length(hkt)
    if strcmp(get(hkt(kk),'string'),'m doit tre entier !')
        hkt2=[hkt2,hkt(kk)];
     end;
      if strcmp(get(hkt(kk),'string'),'n doit tre entier !')
        hkt2=[hkt2,hkt(kk)];
     end;  
     if strcmp(get(hkt(kk),'string'),'k doit tre entier !')
        hkt2=[hkt2,hkt(kk)];
     end;
     if strcmp(get(hkt(kk),'string'),'il faut que m \leq n !')
        hkt2=[hkt2,hkt(kk)];
     end;
end;
delete(hkt2);

Contact us