- Timestamp:
- 09/09/11 14:58:09 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/model/mesh/rifts/meshprocessoutsiderifts.m
r9729 r9733 12 12 13 13 %first, flag nodes that belong to the domain outline 14 flags=ContourToMesh(md. elements,md.x,md.y,domainoutline,'node',0);14 flags=ContourToMesh(md.mesh.elements,md.x,md.y,domainoutline,'node',0); 15 15 16 16 rift=md.rifts.riftstruct(i); … … 43 43 while flags(B), %as long as B does not belong to the domain outline, keep looking. 44 44 %detect elements on edge A,B: 45 edgeelements=ElementsFromEdge(md. elements,A,B);45 edgeelements=ElementsFromEdge(md.mesh.elements,A,B); 46 46 %rule out those we already detected 47 47 already_detected=ismember(edgeelements,elements); … … 50 50 elements=[elements;nextelement]; 51 51 %new B: 52 B=md. elements(nextelement,find(~ismember(md.elements(nextelement,:),[A B])));52 B=md.mesh.elements(nextelement,find(~ismember(md.mesh.elements(nextelement,:),[A B]))); 53 53 end 54 54 … … 61 61 62 62 %replace tip in elements 63 newelements=md. elements(elements,:);63 newelements=md.mesh.elements(elements,:); 64 64 pos=find(newelements==tip); 65 65 newelements(pos)=num; 66 md. elements(elements,:)=newelements;66 md.mesh.elements(elements,:)=newelements; 67 67 md.rifts.riftstruct(i).tips=[md.rifts.riftstruct(i).tips num]; 68 68 … … 73 73 pos=find(md.mesh.segments(segment_index,1:2)~=tip); 74 74 other_node=md.mesh.segments(segment_index,pos); 75 if ~isconnected(md. elements,other_node,tip),75 if ~isconnected(md.mesh.elements,other_node,tip), 76 76 pos=find(md.mesh.segments(segment_index,1:2)==tip); 77 77 md.mesh.segments(segment_index,pos)=num; … … 83 83 84 84 %Fill in rest of fields: 85 md.mesh.numberofelements=length(md. elements);85 md.mesh.numberofelements=length(md.mesh.elements); 86 86 md.mesh.numberofvertices=length(md.x); 87 87 md.z=zeros(md.mesh.numberofvertices,1);
Note:
See TracChangeset
for help on using the changeset viewer.