Changeset 5569 for issm/trunk
- Timestamp:
- 08/25/10 09:20:45 (15 years ago)
- Location:
- issm/trunk/test/Par
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/Par/ISMIPC.par
r5117 r5569 9 9 disp(' creating drag'); 10 10 md.drag_type=2; %0 none 1 plastic 2 viscous 11 md.drag_coefficient=sqrt(md.yts.*(1000+1000*sin(md.x*2*pi/max(md.x/2)).*sin(md.y*2*pi/max(md.x/2)))./(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed)));12 %md.drag_coefficient=sqrt(md.yts.*(1000+1000*sin(md.x*2*pi/max(md.x)).*sin(md.y*2*pi/max(md.x)))./(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed)));11 %md.drag_coefficient=sqrt(md.yts.*(1000+1000*sin(md.x*2*pi/max(md.x/2)).*sin(md.y*2*pi/max(md.x/2)))./(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed))); 12 md.drag_coefficient=sqrt(md.yts.*(1000+1000*sin(md.x*2*pi/max(md.x)).*sin(md.y*2*pi/max(md.x)))./(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed))); 13 13 %Take care of iceshelves: no basal drag 14 14 pos=find(md.elementoniceshelf); -
issm/trunk/test/Par/ISMIPE.par
r5178 r5569 22 22 md.drag_type=2; %0 none 1 plastic 2 viscous 23 23 md.drag_coefficient=zeros(md.numberofgrids,1); 24 %Take care of iceshelves: no basal drag25 pos=find(md.elementoniceshelf);26 md.drag_coefficient(md.elements(pos,:))=0;27 24 md.drag_p=ones(md.numberofelements,1); 28 25 md.drag_q=ones(md.numberofelements,1);
Note:
See TracChangeset
for help on using the changeset viewer.