source: issm/oecreview/Archive/11618-11630/ISSM-11629-11630.diff

proj/ice/larour/issm-uci-clean/trunk-jpl/src/m/qmu/dakota_in_write.m

@@ -62 +62 @@
 if ~exist('filei' ,'var') || isempty(filei)
     filei=input('Dakota input file to write?  ','s');
 end
-[pathstr,name,ext,versn] = fileparts(filei);
+[pathstr,name,ext] = fileparts(filei);
 if isempty(ext)
 % fileparts only considers '.in' to be the extension, not '.qmu.in'
     ext='.qmu.in';
 end
-filei2=fullfile(pathstr,[name ext versn]);
+filei2=fullfile(pathstr,[name ext]);
 
 display(sprintf('Opening Dakota input file ''%s''.',filei2));
 fidi=fopen(sprintf('%s',filei2),'w');