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
 n=find_system(gcs, 'findall','on');
 ln=length(n);
 t_l=[];
 t_b=[];
 for k=1:1:ln
    t=get_param(n(k),'type');
    if strcmp(t,'line')
        t_l=[t_l,n(k)];
     elseif strcmp(t,'block')
     t_b=[t_b,n(k)];
    end
 end    
for k=1:1:length(t_l)
    delete_line(t_l(k))
end;
for k=1:1:length(t_b)
    nom_b=get_param(t_b(k),'name');
    if ~strcmp(nom_b,'powergui')
        delete_block(t_b(k))
    end
end

Contact us