Changeset 1849

Timestamp:

08/24/09 18:04:32 (16 years ago)

Author:

Eric.Larour

Message:

Brachning back from issm.controlstatic, by hand

File:

• issm/trunk/src/m/solutions/cielo/thermal.m (modified) (1 diff)

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

@@ -26 +26 @@
         inputs=add(inputs,'pressure',models.t.parameters.p_g,'doublevec',1,models.t.parameters.numberofnodes);
         inputs=add(inputs,'dt',models.t.parameters.dt*models.t.parameters.yts,'double');
+
+        %compute solution
+        if ~models.t.parameters.qmu_analysis,
+                %launch core of diagnostic solution.
+                results=thermal_core(models,inputs);
         
-        %call core
-        results=thermal_core(models,inputs);
-
-        %plug onto the model
-        if ~isstruct(md.results), md.results=struct(); end
-        md.results.thermal=processresults(models,results);
+                %process results
+                if ~isstruct(md.results), md.results=struct(); end
+                md.results.thermal=processresults(models,results);
+        else
+                %launch dakota driver for diagnostic core solution
+                Qmu(models,inputs,models.t.parameters);
+        end
 
         %stop timing