Changeset 2663

Timestamp:

11/16/09 11:58:14 (15 years ago)

Author:

seroussi

Message:

fixed routine to convert argus file into model

File:

• issm/trunk/src/m/utils/Mesh/argusmesh.m (modified) (1 diff)

issm/trunk/src/m/utils/Mesh/argusmesh.m

@@ -75 +75 @@
 md.y=y;
 md.z=z;
-md.gridonboundary=nodes_on_boundary;
-md.notes=addnotes(md,notes);
+md.numberofgrids=size(md.x,1);
+md.numberofelements=size(md.elements,1);
+md.gridonbed=ones(md.numberofgrids,1);
+md.gridonsurface=ones(md.numberofgrids,1);
+md.elementonbed=ones(md.numberofelements,1);
+md.elementonsurface=ones(md.numberofelements,1);
+md.counter=1;
+md.type='2d';
+md.riftoutline='';
+md.domainoutline=['' infile ''];
+md=addnote(md,notes);
+
+%Add segments and grids on boundary
+md.segments=findsegments(md);
+md.gridonboundary=zeros(md.numberofgrids,1);
+md.gridonboundary(md.segments(:,1))=1;
+md.gridonboundary(md.segments(:,2))=1;