Changeset 4135

Timestamp:

06/22/10 18:22:44 (15 years ago)

Author:

seroussi

Message:

some OutputResults missing in serial

Location:

issm/trunk/src/m/solutions

Files:

• balancedthickness.m (modified) (1 diff)
• balancedthickness2.m (modified) (1 diff)
• balancedvelocities.m (modified) (1 diff)
• prognostic.m (modified) (1 diff)
• prognostic2.m (modified) (1 diff)
• steadystate.m (modified) (1 diff)
• thermal.m (modified) (1 diff)
• transient3d_core.m (modified) (1 diff)

issm/trunk/src/m/solutions/balancedthickness.m ¶

@@ -22 +22 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=balancedthickness_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/balancedthickness2.m ¶

@@ -19 +19 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=balancedthickness2_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/balancedvelocities.m ¶

@@ -22 +22 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=balancedvelocities_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/prognostic.m ¶

@@ -23 +23 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=prognostic_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/prognostic2.m ¶

@@ -22 +22 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=prognostic2_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/steadystate.m ¶

@@ -33 +33 @@
 
                 end
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
+
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/thermal.m ¶

@@ -22 +22 @@
                 displaystring(verbose,'%s',['call computational core']);
                 femmodel=thermal_core(femmodel);
+
+                displaystring(verbose,'%s',['write results']);
+                OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
         else
                 %launch dakota driver for diagnostic core solution

issm/trunk/src/m/solutions/transient3d_core.m ¶

@@ -49 +49 @@
                 InputToResult(femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters,TemperatureEnum,step,time);
                 InputToResult(femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters,MeltingEnum,step,time);
+
+                %Save temporary results
+                if mod(step,5)==0,
+                        displaystring(verbose,'\n%s',['saving temporary results...']);
+                        OutputResults(femmodel.elements, femmodel.loads, femmodel.nodes, femmodel.vertices, femmodel.materials, femmodel.parameters);
+                end
         end