function s=readidi(nom,debut,longeur);
% Syntax: s=readidi(nom,debut,longeur)
%
% Fonc. pour lire les fichiers de format IDIAP
% (binaires, shorts, deux parties de short permutees) en Matlab.
% Pas de chemin par default !
% Pas d'extension par default !
% La fonction lit longeur mots a partir de debut
% si longeur==inf, le fichier est lit jusqu'a la fin

fpsig=fopen(nom,'r');

s=fread(fpsig,debut,'ushort'); % partie a sauter
s=fread(fpsig,longeur,'ushort');
s=floor(s/256)+rem(s,256)*256;
ineg=find(s>32767);
s(ineg)=s(ineg)-2*32768;

fclose(fpsig);