Changeset 18177

Timestamp:

06/23/14 16:39:50 (11 years ago)

Author:

Mathieu Morlighem

Message:

CHG: testing more 2d FS elements

Location:

issm/trunk-jpl/test

Files:

• Archives/Archive701.nc (modified) ( previous)
• NightlyRun/test701.m (modified) (1 diff)

issm/trunk-jpl/test/NightlyRun/test701.m

@@ -34 +34 @@
 md.stressbalance.spcvx(find(vertexflags(md.mesh,4)))=0;
 md.stressbalance.spcvy(find(vertexflags(md.mesh,4)))=0;
-%md.stressbalance.spcvx(find(vertexflags(md.mesh,4) | vertexflags(md.mesh,2)))=0;
-%md.stressbalance.spcvy(find(vertexflags(md.mesh,4) | vertexflags(md.mesh,2)))=0;
 
 %Misc
 md=setflowequation(md,'FS','all');
-md.flowequation.fe_FS='TaylorHood';
 md.stressbalance.abstol=NaN;
+md.stressbalance.FSreconditioning=1;
+md.flowequation.XTH_r=10000;
 md.miscellaneous.name = 'flowline';
+md.cluster=generic('np',2);
 
 %Go solve
-md.cluster=generic('np',2);
-md=solve(md,StressbalanceSolutionEnum());
-
-%Fields and tolerances to track changes
-field_names     ={'Vx','Vy','Vel','Pressure'};
-field_tolerances={5e-10,2e-9,2e-9,1e-10};
-field_values={...
-        (md.results.StressbalanceSolution.Vx),...
-        (md.results.StressbalanceSolution.Vy),...
-        (md.results.StressbalanceSolution.Vel),...
-        (md.results.StressbalanceSolution.Pressure)};
+field_names={};
+field_tolerances={};
+field_values={};
+for i={'MINI','MINIcondensed','TaylorHood','XTaylorHood','CrouzeixRaviart'}
+        disp(' ');
+        disp([' ===== Testing ' i{1} ' Full-Stokes Finite element =====']);
+        md.flowequation.fe_FS=i{1};
+        md=solve(md,StressbalanceSolutionEnum());
+        field_names     ={field_names{:},['Vx' i{1}],['Vy' i{1}],['Vel' i{1}],['Pressure' i{1}]};
+        field_tolerances={field_tolerances{:},5e-10,2e-9,2e-9,1e-10};
+        field_values={field_values{:},...
+                (md.results.StressbalanceSolution.Vx),...
+                (md.results.StressbalanceSolution.Vy),...
+                (md.results.StressbalanceSolution.Vel),...
+                (md.results.StressbalanceSolution.Pressure),...
+                };
+end