Changeset 6263

Timestamp:

10/12/10 14:18:19 (15 years ago)

Author:

Mathieu Morlighem

Message:

Compute all gradients serially

File:

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

issm/trunk/src/m/solutions/gradient_core.m

@@ -30 +30 @@
 
                 displaystring(verbose,['      compute gradient of J with respect to %s\n'],EnumToString(control_type(i)));
-                grad=Gradj(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters);
+                grad=Gradj(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,control_type(i));
 
                 if control_steady,