Changeset 4690

Timestamp:

07/21/10 09:23:18 (15 years ago)

Author:

Mathieu Morlighem

Message:

Added upperelement extraction

File:

• issm/trunk/src/m/classes/public/modelextract.m (modified) (1 diff)

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

@@ -115 +115 @@
                 pos=find(~isnan(md2.lowergrids));
                 md2.lowergrids(pos)=Pgrid(md2.lowergrids(pos));
+
+                md2.upperelements=md1.upperelements(pos_elem);
+                pos=find(~isnan(md2.upperelements));
+                md2.upperelements(pos)=Pelem(md2.upperelements(pos));
+
+                md2.lowerelements=md1.lowerelements(pos_elem);
+                pos=find(~isnan(md2.lowerelements));
+                md2.lowerelements(pos)=Pelem(md2.lowerelements(pos));
         end