cellidx.m File Reference

Functions
endif	if (ischar(strlist)) tmp
endfor endif	if (ischar(listvar)) tmp
	if (!iscellstr(listvar)) errmsg
	elseif (!iscellstr(strlist)) errmsg
endif	if (length(errmsg)) if(nargout< 2) error(errmsg)
else	idxvec (idx)
endif endif endfor	if (idxvec(idx)==0) errmsg
	if (nargout==1) error(errmsg)
Variables
	function [idxvec, errmsg]
	strlist = {}
for	kk
	listvar = {}
endfor endif	idxvec = zeros (length(strlist), 1)
	errmsg = ""
else	return
endif endif	nsigs = length(listvar)
for	idx
for	jdx
else	break

---

Function Documentation

elseif

(

!

iscellstrstrlist

)

else idxvec

(

idx

)

if

(

nargout

= =1

)

endif endif endfor if

(

idxvec(idx)

= =0

)

endif if

(

length(errmsg)

)

if

(

!

iscellstrlistvar

)

endfor endif if

(

ischar(listvar)

)

endif if

(

ischar(strlist)

)

---

Variable Documentation

else break

errmsg = ""

function[idxvec, errmsg]

Initial value:

 cellidx (listvar, strlist)

  if (nargin != 2)
    print_usage ()

for idx

Initial value:

 1:length(strlist)
    signame = strlist{idx}

endfor endif idxvec = zeros (length(strlist), 1)

for jdx

Initial value:

 1:nsigs
      if (strcmp (signame, listvar{jdx}))
        if (idxvec(idx) != 0)
          warning ("Duplicate signal name %s (%d,%d)\n",
                   listvar{jdx}, jdx, idxvec(idx))

for kk

Initial value:

 1:rows(tmp)
      strlist{kk} = deblank (tmp(kk,:))

listvar = {}

endif endif nsigs = length(listvar)

else return

strlist = {}