from
f2matlab
by Ben Barrowes Converts basic fortran90 source code to MATLAB source code.
out=varInUsedMods(word,modLocalVar,usedMods);
function out=varInUsedMods(word,modLocalVar,usedMods);
out={};
for i=length(usedMods):-1:1
temp1=find(strcmp(word,{modLocalVar{usedMods(i),2}{:,1}}));
if ~isempty(temp1)
out={modLocalVar{usedMods(i),2}{temp1,:}};
break
end % if ~isempty(temp1)
end % for i=1:length(usedMods)
