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_parametres.m
function [MOG,DEF,fe]=test_parametres(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;


[DEF,fe]=lecture_parametre(MOG,DEF);

Contact us