a=upper(a); c=b; for i=';;;' c = find(any(ismember(char(a)',a{c}))); c = find(any(ismember(char(a)',[a{c}]))); end