annotate utilities/UTIL_paramsList.m @ 38:c2204b18f4a2 tip

End nov big change
author Ray Meddis <rmeddis@essex.ac.uk>
date Mon, 28 Nov 2011 13:34:28 +0000
parents f233164f4c86
children
rev   line source
rmeddis@0 1 function paramsFound=UTIL_paramsList(myWhos)
rmeddis@0 2 % UTIL_paramsList looks for structures with names ending in Params.
rmeddis@0 3 % nm=UTIL_paramsList(whos);
rmeddis@0 4 % for i=1:length(nm), eval(['showStruct(' nm{i} ', ''' nm{i} ''')']),end
rmeddis@0 5
rmeddis@0 6 % find structures ending with params
rmeddis@0 7 paramsUsedCount=0;
rmeddis@0 8 for i=1:length(myWhos)
rmeddis@0 9 var=myWhos(i).name;
rmeddis@0 10 if length(var)>5
rmeddis@0 11 tag=var(end-5:end);
rmeddis@0 12 if strcmp(tag,'Params')
rmeddis@0 13 paramsUsedCount=paramsUsedCount+1;
rmeddis@0 14 paramsUsed{paramsUsedCount}=var;
rmeddis@0 15 end
rmeddis@0 16 end
rmeddis@0 17 end
rmeddis@0 18
rmeddis@0 19
rmeddis@0 20
rmeddis@0 21 orderedList={'controlParams', 'globalStimParams', 'inputStimulusParams',...
rmeddis@0 22 'OMEParams', 'DRNLParams', ...
rmeddis@0 23 'IHC_cilia_RPParams', 'IHCpreSynapseParams', 'AN_IHCsynapseParams', ...
rmeddis@0 24 'MacGregorMultiParams', 'MacGregorParams'};
rmeddis@0 25
rmeddis@0 26
rmeddis@0 27 % check that they belong to the approved list
rmeddis@0 28 paramsFoundcount=0;
rmeddis@0 29 for i=1:length(orderedList)
rmeddis@0 30 for j=1:length(paramsUsed)
rmeddis@0 31 usedName=paramsUsed{j};
rmeddis@0 32 if strcmp(orderedList{i},paramsUsed{j})
rmeddis@0 33 paramsFoundcount=paramsFoundcount+1;
rmeddis@0 34 paramsFound{paramsFoundcount}=usedName;
rmeddis@0 35 end
rmeddis@0 36 end
rmeddis@0 37 end
rmeddis@0 38
rmeddis@0 39 % return the list of names
rmeddis@0 40