Changeset 25836 for issm/trunk/test/NightlyRun/test4001.m
- Timestamp:
- 12/08/20 08:45:53 (4 years ago)
- Location:
- issm/trunk
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk
- Property svn:mergeinfo changed
-
issm/trunk/test
- Property svn:mergeinfo changed
-
issm/trunk/test/NightlyRun
- Property svn:ignore
-
old new 18 18 run.old 19 19 run_matlab 20 test218.qmu.in 21 test218.qmu.out 22 test218.qmu.err
-
- Property svn:ignore
-
issm/trunk/test/NightlyRun/test4001.m
r24686 r25836 439 439 440 440 %level sets: 441 md.mask. groundedice_levelset=-ones(md.mesh.numberofvertices,1);441 md.mask.ocean_levelset=-ones(md.mesh.numberofvertices,1); 442 442 md.mask.ice_levelset=ones(md.mesh.numberofvertices,1); 443 443 444 444 pos=find(ice_mask); md.mask.ice_levelset(pos)=-1; 445 pos=find(~iceshelf_mask & ice_mask); md.mask. groundedice_levelset(pos)=1;445 pos=find(~iceshelf_mask & ice_mask); md.mask.ocean_levelset(pos)=1; 446 446 447 447 %identify edges of grounded ice: 448 groundedice_levelset=md.mask.groundedice_levelset;448 ocean_levelset=md.mask.ocean_levelset; 449 449 for i=1:md.mesh.numberofelements, 450 m= groundedice_levelset(md.mesh.elements(i,:));450 m=ocean_levelset(md.mesh.elements(i,:)); 451 451 if abs(sum(m))~=3, 452 pos=find(m==1); md.mask. groundedice_levelset(md.mesh.elements(i,pos))=0;452 pos=find(m==1); md.mask.ocean_levelset(md.mesh.elements(i,pos))=0; 453 453 end 454 454 end … … 483 483 %friction: 484 484 md.friction.coefficient=30*ones(md.mesh.numberofvertices,1); 485 pos=find(md.mask. groundedice_levelset<=0);485 pos=find(md.mask.ocean_levelset<=0); 486 486 md.friction.coefficient(pos)=0; 487 487 md.friction.p=ones(md.mesh.numberofelements,1); … … 521 521 vertex_on_boundary=zeros(md.mesh.numberofvertices,1); 522 522 vertex_on_boundary(md.mesh.segments(:,1:2))=1; 523 pos=find(vertex_on_boundary & md.mask. groundedice_levelset<=0);523 pos=find(vertex_on_boundary & md.mask.ocean_levelset<=0); 524 524 md.stressbalance.spcvx(pos)=md.initialization.vx(pos); 525 525 md.stressbalance.spcvy(pos)=md.initialization.vy(pos); … … 838 838 md.initialization.vel=md.results.TransientSolution(end).Vel; 839 839 md.initialization.pressure=md.results.TransientSolution(end).Pressure; 840 md.mask. groundedice_levelset=md.results.TransientSolution(end).MaskGroundediceLevelset;840 md.mask.ocean_levelset=md.results.TransientSolution(end).MaskOceanLevelset; 841 841 md.results.TransientSolution(end).FloatingiceMeltingRate=md.basalforcings.floatingice_melting_rate; 842 842 … … 862 862 fnm=['run/SHICE_fwFluxtave_0000017520.data']; 863 863 melting_rate_4=readbin(fnm,[Nx Ny]); 864 field_names ={'Base1','Melting1','Vx2','Vy2','Thickness2','Base2','Mask GroundediceLevelset2','FloatingiceMeltingRate2',...865 'Melting2','Vx3','Vy3','Thickness3','Base3','Mask GroundediceLevelset3','FloatingiceMeltingRate3',...866 'Melting3','Vx4','Vy4','Thickness4','Base4','Mask GroundediceLevelset4','FloatingiceMeltingRate4','Melting4'};864 field_names ={'Base1','Melting1','Vx2','Vy2','Thickness2','Base2','MaskOceanLevelset2','FloatingiceMeltingRate2',... 865 'Melting2','Vx3','Vy3','Thickness3','Base3','MaskOceanLevelset3','FloatingiceMeltingRate3',... 866 'Melting3','Vx4','Vy4','Thickness4','Base4','MaskOceanLevelset4','FloatingiceMeltingRate4','Melting4'}; 867 867 field_tolerances={2e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,... 868 868 1e-13, 1e-13, 1e-13, 1e-13, 1e-13, 1e-13, 1e-13,... … … 875 875 (md.results(2).TransientSolution(end).Thickness),... 876 876 (md.results(2).TransientSolution(end).Base),... 877 (md.results(2).TransientSolution(end).Mask GroundediceLevelset),...877 (md.results(2).TransientSolution(end).MaskOceanLevelset),... 878 878 (md.results(2).TransientSolution(end).FloatingiceMeltingRate),... 879 879 (melting_rate_2(:)),... … … 882 882 (md.results(3).TransientSolution(end).Thickness),... 883 883 (md.results(3).TransientSolution(end).Base),... 884 (md.results(3).TransientSolution(end).Mask GroundediceLevelset),...884 (md.results(3).TransientSolution(end).MaskOceanLevelset),... 885 885 (md.results(3).TransientSolution(end).FloatingiceMeltingRate),... 886 886 (melting_rate_3(:)),... … … 889 889 (md.results(4).TransientSolution(end).Thickness),... 890 890 (md.results(4).TransientSolution(end).Base),... 891 (md.results(4).TransientSolution(end).Mask GroundediceLevelset),...891 (md.results(4).TransientSolution(end).MaskOceanLevelset),... 892 892 (md.results(4).TransientSolution(end).FloatingiceMeltingRate),... 893 893 (melting_rate_4(:)),...
Note:
See TracChangeset
for help on using the changeset viewer.