Changeset 469

Timestamp:

05/18/09 10:41:18 (16 years ago)

Author:

Mathieu Morlighem

Message:

subanalysis type missing in core linear CIELO serial

Location:

issm/trunk/src/m/solutions/cielo

Files:

• diagnostic_core.m (modified) (1 diff)
• diagnostic_core_linear.m (modified) (2 diffs)

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

@@ -59 +59 @@
         displaystring(debug,'\n%s',['computing vertical velocities...']);
         inputs=add(inputs,'velocity',u_g_horiz,'doublevec',m_dh.parameters.numberofdofspernode,m_dh.parameters.numberofnodes);
+        which diagnostic_core_linear
         u_g_vert=diagnostic_core_linear(m_dv,inputs,'diagnostic','vert');
 

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

@@ -1 @@
-function u_g=diagnostic_core_linear(m,inputs,analysis_type)
+function u_g=diagnostic_core_linear(m,inputs,analysis_type,sub_analysis_type)
 %DIAGNOSTIC_CORE_LINEAR - linear solution sequence
 %
 %   Usage:
-%      u_g=diagnostic_core_linear(m,inputs,analysis_type)
+%      u_g=diagnostic_core_linear(m,inputs,analysis_type,sub_analysis_type)
 
         %stiffness and load generation only:
@@ -12 +12 @@
         
         %system matrices
-        [K_gg, p_g]=SystemMatrices(m.elements,m.nodes,m.loads,m.materials,m.parameters,inputs,analysis_type);
+        [K_gg, p_g]=SystemMatrices(m.elements,m.nodes,m.loads,m.materials,m.parameters,inputs,analysis_type,sub_analysis_type);
         
         %Reduce tangent matrix from g size to f size