Changeset 22210

Timestamp:

11/01/17 15:28:12 (7 years ago)

Author:

Mathieu Morlighem

Message:

CHG: added subdomains

File:

• issm/trunk-jpl/src/m/mesh/bamg.m (modified) (2 diffs)

issm/trunk-jpl/src/m/mesh/bamg.m

@@ -58 +58 @@
 bamg_mesh=bamgmesh();
 
+subdomain_ref = 1;
 % Bamg Geometry parameters {{{
 if exist(options,'domain'),
@@ -102 +103 @@
                 bamg_geometry.Vertices=[bamg_geometry.Vertices; [domain(i).x(1:nods) domain(i).y(1:nods) ones(nods,1)]];
                 bamg_geometry.Edges   =[bamg_geometry.Edges;    [transpose(count+1:count+nods) transpose([count+2:count+nods count+1])  1.*ones(nods,1)]];
-                if i>1, bamg_geometry.SubDomains=[bamg_geometry.SubDomains; 2 count+1 1 1]; end
+                if i>1, bamg_geometry.SubDomains=[bamg_geometry.SubDomains; 2 count+1 1 subdomain_ref]; subdomain_ref = subdomain_ref+1; end
 
                 %update counter