Changeset 5117


Ignore:
Timestamp:
08/10/10 11:44:24 (15 years ago)
Author:
seroussi
Message:

more and more tests ...

Location:
issm/trunk/test
Files:
7 added
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/test/Par/ISMIPC.par

    r5049 r5117  
    99disp('      creating drag');
    1010md.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/3)).*sin(md.y*2*pi/max(md.x/3)))./(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed)));
     11md.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)));
    1212%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)));
    1313%Take care of iceshelves: no basal drag
Note: See TracChangeset for help on using the changeset viewer.