rmeddis@0: function paramsFound=UTIL_paramsList(myWhos)
rmeddis@0: % UTIL_paramsList looks for structures with names ending in Params.
rmeddis@0: % nm=UTIL_paramsList(whos);
rmeddis@0: % for i=1:length(nm), eval(['showStruct(' nm{i} ', ''' nm{i} ''')']),end
rmeddis@0: 
rmeddis@0: % find structures ending with params
rmeddis@0: paramsUsedCount=0;
rmeddis@0: for i=1:length(myWhos)
rmeddis@0:     var=myWhos(i).name;
rmeddis@0:     if length(var)>5
rmeddis@0:         tag=var(end-5:end);
rmeddis@0:         if strcmp(tag,'Params')
rmeddis@0:             paramsUsedCount=paramsUsedCount+1;
rmeddis@0:             paramsUsed{paramsUsedCount}=var;
rmeddis@0:         end
rmeddis@0:     end
rmeddis@0: end
rmeddis@0: 
rmeddis@0: 
rmeddis@0: 
rmeddis@0: orderedList={'controlParams', 'globalStimParams', 'inputStimulusParams',...
rmeddis@0:      'OMEParams', 'DRNLParams', ...
rmeddis@0:     'IHC_cilia_RPParams', 'IHCpreSynapseParams', 'AN_IHCsynapseParams', ...
rmeddis@0:     'MacGregorMultiParams', 'MacGregorParams'};
rmeddis@0: 
rmeddis@0: 
rmeddis@0: % check that they belong to the approved list
rmeddis@0: paramsFoundcount=0;
rmeddis@0: for i=1:length(orderedList)
rmeddis@0:     for j=1:length(paramsUsed)
rmeddis@0:         usedName=paramsUsed{j};
rmeddis@0:         if strcmp(orderedList{i},paramsUsed{j})
rmeddis@0:             paramsFoundcount=paramsFoundcount+1;
rmeddis@0:             paramsFound{paramsFoundcount}=usedName;
rmeddis@0:         end
rmeddis@0:     end
rmeddis@0: end
rmeddis@0: 
rmeddis@0: % return the list of names
rmeddis@0: