Code covered by the BSD License  

Highlights from
f2matlab

f2matlab

by

 

16 Jun 2004 (Updated )

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)
 

Contact us