warn_fortran_indexing = 1;
a = [9,8,7,6];
isempty (a(logical ([0,0,0,0])))
