partie 1 : Compression :
Isdigit
function ind = isdigit(caracter)
error(nargchk(1, 1, nargin));
ind = ischar(c) & ( '0' <= caracter ) & ( caracter <= '9' );
function ind = isdigit(caracter)
error(nargchk(1, 1, nargin));
ind = ischar(c) & ( '0' <= caracter ) & ( caracter <= '9' );