Changeset 8305 for issm/trunk/test/Par/ISMIPE.par
- Timestamp:
- 05/16/11 15:50:32 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/Par/ISMIPE.par
r5966 r8305 4 4 data=load('../Data/ISMIPE.data','-mat'); 5 5 data=data.data; 6 md.surface=zeros(md.numberof grids,1);7 md.bed=zeros(md.numberof grids,1);8 for i=1:md.numberof grids6 md.surface=zeros(md.numberofnodes,1); 7 md.bed=zeros(md.numberofnodes,1); 8 for i=1:md.numberofnodes 9 9 y=md.y(i); 10 10 point1=floor(y/100)+1; … … 15 15 end 16 16 md.thickness=md.surface-md.bed; 17 md.firn_layer=0*ones(md.numberof grids,1);17 md.firn_layer=0*ones(md.numberofnodes,1); 18 18 md.thickness(find(~md.thickness))=0.01; 19 19 md.bed=md.surface-md.thickness; … … 21 21 disp(' creating drag'); 22 22 md.drag_type=2; %0 none 1 plastic 2 viscous 23 md.drag_coefficient=zeros(md.numberof grids,1);23 md.drag_coefficient=zeros(md.numberofnodes,1); 24 24 md.drag_p=ones(md.numberofelements,1); 25 25 md.drag_q=ones(md.numberofelements,1); 26 26 27 27 disp(' creating flow law paramter'); 28 md.rheology_B=6.8067*10^7*ones(md.numberof grids,1);28 md.rheology_B=6.8067*10^7*ones(md.numberofnodes,1); 29 29 md.rheology_n=3*ones(md.numberofelements,1); 30 30
Note:
See TracChangeset
for help on using the changeset viewer.