ismembercellstr.m

Go to the documentation of this file.

function [isThereVec,indLocVec]=ismembercellstr(leftList,rightList,isHigherIndexUsed)
if nargin==2
    isHigherIndexUsed=false;
end
%
nRightElems=numel(rightList);
nLeftElems=numel(leftList);
%
if ischar(leftList)
    if ischar(rightList)
        isThereVec=strcmp(leftList,rightList);
        indLocVec=double(isThereVec);
    else
        isThereVec=false;
        indLocVec=0;
        if isHigherIndexUsed
            for iRightElem=1:nRightElems
                if strcmp(leftList,rightList{iRightElem})
                    isThereVec=true;
                    indLocVec=iRightElem;
                end
            end
        else
            for iRightElem=1:nRightElems
                if strcmp(leftList,rightList{iRightElem})
                    isThereVec=true;
                    indLocVec=iRightElem;
                    break;
                end
            end
        end
    end
else
    isThereVec=false(size(leftList));
    indLocVec=zeros(size(leftList));
    if ischar(rightList)
        if isHigherIndexUsed
            for iLeftElem=1:nLeftElems
                if strcmp(leftList{iLeftElem},rightList)
                    isThereVec(iLeftElem)=true;
                    indLocVec(iLeftElem)=1;
                end
            end
        else
            for iLeftElem=1:nLeftElems
                if strcmp(leftList{iLeftElem},rightList)
                    isThereVec(iLeftElem)=true;
                    indLocVec(iLeftElem)=1;
                    break;
                end
            end
        end
    else
        if isHigherIndexUsed
            for iLeftElem=1:nLeftElems
                for iRightElem=1:nRightElems
                    if strcmp(leftList{iLeftElem},rightList{iRightElem})
                        isThereVec(iLeftElem)=true;
                        indLocVec(iLeftElem)=iRightElem;
                    end
                end
            end
        else
            for iLeftElem=1:nLeftElems
                for iRightElem=1:nRightElems
                    if strcmp(leftList{iLeftElem},rightList{iRightElem})
                        isThereVec(iLeftElem)=true;
                        indLocVec(iLeftElem)=iRightElem;
                        break;
                    end
                end
            end
        end
    end
end