Index: /issm/trunk-jpl/src/m/classes/clusters/pfe.m
===================================================================
--- /issm/trunk-jpl/src/m/classes/clusters/pfe.m	(revision 19616)
+++ /issm/trunk-jpl/src/m/classes/clusters/pfe.m	(revision 19617)
@@ -131,7 +131,6 @@
 			 fprintf(fid,'#PBS -e %s.errlog \n\n',[cluster.executionpath '/' dirname '/' modelname]);
 			 fprintf(fid,'. /usr/share/modules/init/bash\n\n');
-			 for i=1:numel(cluster.modules),
-				 fprintf(fid,['module load ' cluster.modules{i} '\n']);
-			 end
+			 fprintf(fid,'module load comp-intel/2015.0.090\n');
+			 fprintf(fid,'module load mpi-sgi/mpt.2.12r16\n');
 			 fprintf(fid,'export PATH="$PATH:."\n\n');
 			 fprintf(fid,'export MPI_GROUP_MAX=64\n\n');
@@ -224,5 +223,5 @@
 			 fprintf(fid,'#PBS -S /bin/bash\n');
 			 fprintf(fid,'#PBS -l select=1:ncpus=%i:model=%s\n',np,cluster.processor);
-			 fprintf(fid,'#PBS -l walltime=%i\n',cluster.time); %walltime is in seconds.
+			 fprintf(fid,'#PBS -l walltime=%i\n',cluster.time*60); %walltime is in seconds.
 			 fprintf(fid,'#PBS -q %s \n',cluster.queue);
 			 fprintf(fid,'#PBS -W group_list=%s\n',cluster.grouplist);
@@ -245,4 +244,15 @@
 			 fclose(fid);
 
+			 %in interactive mode, create a run file, and errlog and outlog file
+			 if cluster.interactive,
+				 fid=fopen([modelname '.run'],'w');
+				 fprintf(fid,['mpiexec -np %i ./mitgcmuv && touch ' modelname '.lock %s\n'],np);
+				 fclose(fid);
+				 fid=fopen([modelname '.errlog'],'w');
+				 fclose(fid);
+				 fid=fopen([modelname '.outlog'],'w');
+				 fclose(fid);
+			 end
+
 		 end %}}}
 		 function UploadQueueJob(cluster,modelname,dirname,filelist)% {{{