Changeset 5490 for issm/trunk/test/NightlyRun/test505.m
- Timestamp:
- 08/23/10 08:26:02 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/NightlyRun/test505.m
r5432 r5490 3 3 md=parameterize(md,'../Par/Pig.par'); 4 4 md=extrude(md,3,0.9); 5 md=setelementstype(md,'pattyn','all');6 md=solve(md,'analysis_type',DiagnosticSolutionEnum);7 vx=PatchToVec(md.results.DiagnosticSolution.Vx);8 vy=PatchToVec(md.results.DiagnosticSolution.Vy);9 vz=PatchToVec(md.results.DiagnosticSolution.Vz);10 pos=find(md.spcvelocity(:,1));11 md.spcvelocity(pos,3)=1;12 5 md=setelementstype(md,'stokes','all'); 13 md.vx=vx;14 md.vy=vy;15 md.vz=vz;16 md.spcvelocity(:,4)=vx;17 md.spcvelocity(:,5)=vy;18 md.spcvelocity(:,6)=vz;19 pos=find(md.borderstokes);20 md.spcvelocity(pos,1)=1;21 md.spcvelocity(pos,2)=1;22 md.spcvelocity(pos,3)=1;23 6 md=solve(md,'analysis_type',DiagnosticSolutionEnum); 24 7
Note:
See TracChangeset
for help on using the changeset viewer.