Changeset 629

Timestamp:

05/28/09 14:56:58 (15 years ago)

Author:

Mathieu Morlighem

Message:

Added a routine to compute stress and strainrate properties quickly from a given velocity (only MacAyeal and 2d)

Location:

issm/trunk/src/m/classes/public

Files:

• mechanicalproperties.m (added)
• process_solve_options.m (modified) (1 diff)
• solve.m (modified) (1 diff)

issm/trunk/src/m/classes/public/process_solve_options.m

@@ -51 +51 @@
 %check solution type is supported
 if ~(strcmpi(analysis_type,'control') |  ...
-        strcmpi(analysis_type,'diagnostic') |  ...
-        strcmpi(analysis_type,'prognostic') |  ...
-        strcmpi(analysis_type,'thermal') |  ...
-        strcmpi(analysis_type,'mesh') |  ...
-        strcmpi(analysis_type,'mesh2grid') |  ...
-        strcmpi(analysis_type,'transient') ),
+                strcmpi(analysis_type,'diagnostic') |  ...
+                strcmpi(analysis_type,'prognostic') |  ...
+                strcmpi(analysis_type,'thermal') |  ...
+                strcmpi(analysis_type,'parameters') |  ...
+                strcmpi(analysis_type,'mesh') |  ...
+                strcmpi(analysis_type,'mesh2grid') |  ...
+                strcmpi(analysis_type,'transient') ),
         error(['process_solve_options error message: analysis_type ' analysis_type ' not supported yet!']);
 end
 if ~(strcmpi(sub_analysis_type,'none') |  ...
-        strcmpi(sub_analysis_type,'steady') |  ...
-        strcmpi(sub_analysis_type,'horiz') |  ...
-        strcmpi(sub_analysis_type,'vert') |  ...
-        strcmpi(sub_analysis_type,'') |  ...
-        strcmpi(sub_analysis_type,'transient') ),
+                strcmpi(sub_analysis_type,'steady') |  ...
+                strcmpi(sub_analysis_type,'horiz') |  ...
+                strcmpi(sub_analysis_type,'vert') |  ...
+                strcmpi(sub_analysis_type,'') |  ...
+                strcmpi(sub_analysis_type,'transient') ),
         error(['process_solve_options error message: sub_analysis_type ' sub_analysis_type ' not supported yet!']);
 end

issm/trunk/src/m/classes/public/solve.m

@@ -72 +72 @@
 elseif strcmpi(md.analysis_type,'thermal'),
         md=thermal(md);
+
+elseif strcmpi(md.analysis_type,'parameters'),
+        md=parameters(md);
+
 else
         error('solution type not supported for this model configuration.');