Changeset 22034

Timestamp:

09/05/17 08:27:26 (8 years ago)

Author:

Eric.Larour

Message:

CHG: can deal with shape files now.

File:

• issm/branches/trunk-larour-NatGeoScience2016/src/m/mesh/meshband.m (modified) (2 diffs)

issm/branches/trunk-larour-NatGeoScience2016/src/m/mesh/meshband.m

@@ -30 +30 @@
                 end
         end
-        outer=expread(outerdomain);
+
+        [path,name,ext]=fileparts(outerdomain);
+        if strcmpi(ext,'.shp'),
+                outer=shpread(outerdomain);
+        else
+                outer=expread(outerdomain);
+        end
         if outer.closed==0,
                 outer.nods=outer.nods+1;
@@ -38 +44 @@
         end
 
-        domain(1)=outer;
-        domain(2)=inner;
+        domain(1).x=outer.x; 
+        domain(1).y=outer.y; 
+        domain(1).density=outer.density; 
+        domain(1).nods=outer.nods; 
+        domain(1).closed=outer.closed;
         
+        
+        domain(2).x=inner.x; 
+        domain(2).y=inner.y; 
+        domain(2).density=inner.density; 
+        domain(2).nods=inner.nods; 
+        domain(2).closed=inner.closed;
+
+
         expwrite(domain,[temproot '/Band.exp']);