Index: /issm/trunk-jpl/src/m/classes/SMBd18opdd.m
===================================================================
--- /issm/trunk-jpl/src/m/classes/SMBd18opdd.m	(revision 19261)
+++ /issm/trunk-jpl/src/m/classes/SMBd18opdd.m	(revision 19262)
@@ -106,10 +106,19 @@
 			WriteData(fid,'object',self,'class','surfaceforcings','fieldname','sealev','format','DoubleMat','mattype',1);
 
+                        A=self.Tdiff;
+                        A(end,:) = A(end,:)*yts;
+                        WriteData(fid,'data',A,'enum',SurfaceforcingsTdiffEnum(),'format','DoubleMat','mattype',3);
+
 			if self.isd18opd
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','temperatures_presentday','format','DoubleMat','mattype',1);
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','precipitations_presentday','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','delta18o','format','DoubleMat','mattype',1);
+
+                                D=self.delta18o;
+                                D(end,:) = D(end,:)*yts;
+                                WriteData(fid,'data',D,'enum',SurfaceforcingsDelta18oEnum(),'format','DoubleMat','mattype',3);
+                                
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','dpermil','format','Double');
-			end
+
+   end
 		end % }}}
 	end
Index: /issm/trunk-jpl/src/m/classes/SMBpdd.m
===================================================================
--- /issm/trunk-jpl/src/m/classes/SMBpdd.m	(revision 19261)
+++ /issm/trunk-jpl/src/m/classes/SMBpdd.m	(revision 19262)
@@ -155,6 +155,15 @@
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','delta18o_surface','format','DoubleMat','mattype',1);
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','delta18o','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Tdiff','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','sealev','format','DoubleMat','mattype',1);
+
+                                A=self.Tdiff
+                                A(end,:) = A(end,:)*yts;
+                                WriteData(fid,'data',A,'enum',SurfaceforcingsTdiffEnum(),'format','DoubleMat','mattype',3);
+                                
+                                C=self.sealev
+                                C(end,:) = C(end,:)*yts;                                
+                                WriteData(fid,'data',C,'enum',SurfaceforcingsSealevEnum(),'format','DoubleMat','mattype',3);
+
+				% WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Tdiff','format','DoubleMat','mattype',1);
+				% WriteData(fid,'object',self,'class','surfaceforcings','fieldname','sealev','format','DoubleMat','mattype',1);
 			elseif self.ismungsm
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','temperatures_presentday','format','DoubleMat','mattype',1);
@@ -162,7 +171,20 @@
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','precipitations_presentday','format','DoubleMat','mattype',1);
 				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','precipitations_lgm','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Pfac','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Tdiff','format','DoubleMat','mattype',1);
-				WriteData(fid,'object',self,'class','surfaceforcings','fieldname','sealev','format','DoubleMat','mattype',1);
+
+                                A=self.Tdiff;
+                                A(end,:) = A(end,:)*yts;
+                                WriteData(fid,'data',A,'enum',SurfaceforcingsTdiffEnum(),'format','DoubleMat','mattype',3);
+                                
+                                B=self.Pfac;
+                                B(end,:) = B(end,:)*yts;
+                                WriteData(fid,'data',B,'enum',SurfaceforcingsPfacEnum(),'format','DoubleMat','mattype',3);
+
+                                C=self.sealev;
+                                C(end,:) = C(end,:)*yts;                                
+                                WriteData(fid,'data',C,'enum',SurfaceforcingsSealevEnum(),'format','DoubleMat','mattype',3);
+                                
+                                % WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Pfac','format','DoubleMat','mattype',1);
+				% WriteData(fid,'object',self,'class','surfaceforcings','fieldname','Tdiff','format','DoubleMat','mattype',1);
+				% WriteData(fid,'object',self,'class','surfaceforcings','fieldname','sealev','format','DoubleMat','mattype',1);
 			end
 		end % }}}
Index: /issm/trunk-jpl/src/m/classes/clusters/acenet.m
===================================================================
--- /issm/trunk-jpl/src/m/classes/clusters/acenet.m	(revision 19261)
+++ /issm/trunk-jpl/src/m/classes/clusters/acenet.m	(revision 19262)
@@ -68,8 +68,9 @@
 			 fprintf(fid,'#$ -cwd\n');
           fprintf(fid,'#$ -N issm\n');
+          fprintf(fid,'#$ -l h_rt=00:15:00\n');
           % fprintf(fid,'#$ -l h_rt=25:00:0\n');
-          fprintf(fid,'#$ -l h_rt=47:59:00\n');
+          % fprintf(fid,'#$ -l h_rt=47:59:00\n');
           % fprintf(fid,'#$ -l h_rt=72:00:0\n');
-          % fprintf(fid,'#$ -l h_rt=96:00:0\n');
+          fprintf(fid,'#$ -l h_rt=96:00:0\n');
           % fprintf(fid,'#$ -l h_rt=336:00:0\n');
 
@@ -77,18 +78,20 @@
 
           % ---- Which queue to use ----
-          % fprintf(fid,'#$ -q tarasov.q\n'); %
-          %fprintf(fid,'#$ -q medium.q@*,short.q@*\n');
-          fprintf(fid,'#$ -q short.q@*\n');
+          %fprintf(fid,'#$ -q tarasov.q\n'); %
+          fprintf(fid,'#$ -q short.q@*,medium.q@*\n');
+          %fprintf(fid,'#$ -q medium.q@*\n');
+          %fprintf(fid,'#$ -q short.q@*\n');
 
           % ---- Which node are selected ----
-          %fprintf(fid,'#$ -l h=cl27*|cl28*|cl29*|cl30*|cl31*|cl320|cl267|cl268|cl269|cl338 \n');
-          % fprintf(fid,'#$ -l h=cl0* \n');
-          %fprintf(fid,'#$ -l h=cl338 \n');
+          % fprintf(fid,'#$ -l h=cl27*|cl28*|cl29*|cl30*|cl31*|cl320|cl267|cl268|cl269|cl338 \n');
+          %fprintf(fid,'#$ -l h=cl0* \n');
+          % fprintf(fid,'#$ -l h=cl338 \n');
           % Acenet nodes with 16cpus and more than 60G mem
           % fprintf(fid,'#$ -l h=cl001|cl002|cl003|cl004|cl005|cl006|cl007|cl008|cl009|cl010|cl011|cl012|cl021|cl022|cl023|cl024 \n');
   
           % ---- cpus on different nodes ----
-          fprintf(fid,'#$ -pe ompi %i\n',cluster.np); % To avoid green acenet that does not have InfiniBand
+           fprintf(fid,'#$ -pe ompi %i\n',cluster.np); % To avoid green acenet that does not have InfiniBand
           % fprintf(fid,'#$ -pe ompi* %i\n',cluster.np);
+          %fprintf(fid,'#$ -pe 4per* %i\n',cluster.np);
           % -------- All cpus in the same node --------          
           % fprintf(fid,'#$ -pe openmp %i\n',cluster.np);