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

test_bb.m
function [MOG,DEF,fe]=test_bb(MOGi,DEFi)

MOG=MOGi;
DEF=DEFi;

nettoyage
sdnum=get(MOG(1,1),'string');
d_num=str2double(sdnum);
test=(round(DEF(1))==DEF(1));
if ~test
    text(0.14,0.57,'m doit tre entier !',...
        'color','r','fontunits','normalized','fontsize',0.023,...
        'fontweight','bold','horizontalalignment','left',...
        'verticalalignment','middle','interpreter','Tex');
    return
else
    DEF(1)=round(d_num);
end;
sdden=get(MOG(1,2),'string');
d_den=str2double(sdden);
test=(round(DEF(2))==DEF(2));
if ~test
    text(0.14,0.45,'n doit tre entier !',...
        'color','r','fontunits','normalized','fontsize',0.023,...
        'fontweight','bold','horizontalalignment','left',...
        'verticalalignment','middle','interpreter','Tex');
    return
else
    DEF(2)=round(d_den);
end;
sc=get(MOG(1,3),'string');
classe=str2double(sc);
test=(round(DEF(3))==DEF(3));
if ~test
    text(0.14,0.33,'k doit tre entier !',...
        'color','r','fontunits','normalized','fontsize',0.023,...
        'fontweight','bold','horizontalalignment','left',...
        'verticalalignment','middle','interpreter','Tex');
    return
else
    DEF(3)=round(classe);
end;
test=(DEF(1)<=DEF(2));
if ~test
    text(0.14,0.28,'il faut que m \leq n !',...
        'color','r','fontunits','normalized','fontsize',0.023,...
        'fontweight','bold','horizontalalignment','left',...
        'verticalalignment','middle','interpreter','Tex');
    return
end;

if DEF(6)==1
    [DEF,fe]=lecture_bb(MOG,DEF);
else
    [DEF,fe]=lecture_sbpa(MOG,DEF);
end;

Contact us