Changeset 2530

Timestamp:

10/26/09 08:50:31 (15 years ago)

Author:

Mathieu Morlighem

Message:

fixed results extraction in model extract
minor display inprovement of parameters

Location:

issm/trunk/src/m/classes/public

Files:

• display/displayparameters.m (modified) (1 diff)
• modelextract.m (modified) (3 diffs)

issm/trunk/src/m/classes/public/display/displayparameters.m

@@ -11 +11 @@
 disp(sprintf('   Parameters:'));
 
-disp(sprintf('\n      geometry:'));
+disp(sprintf('\n      geometrical parameters:'));
 fielddisplay(md,'surface','surface height [m]');
 fielddisplay(md,'thickness','thickness [m]');

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

@@ -179 +179 @@
                 md2.nodeconnectivity=NodeConnectivity(md2.elements,md2.numberofgrids);
                 md2.elementconnectivity=ElementConnectivity(md2.elements,md2.nodeconnectivity);
-                md2.segments=findsegments(md2);
+                md2.segments=contourenvelope(md2);
                 md2.gridonboundary=zeros(numberofgrids2,1); md2.gridonboundary(md2.segments(:,1:2))=1;
         end
@@ -248 +248 @@
         %Results fields
         if isstruct(md1.results),
+                md2.results=struct();
                 solutionfields=fields(md1.results);
                 for i=1:length(solutionfields),
@@ -258 +259 @@
                                 elseif length(field)==numberofelements1,
                                         md2.results.(solutionfields(i)).(solutionsubfields(j))=field(pos_elem);
+                                else
+                                        md2.results.(solutionfields(i)).(solutionsubfields(j))=field;
                                 end
                         end