Ignore:
Timestamp:
09/06/11 11:11:00 (14 years ago)
Author:
Mathieu Morlighem
Message:

Added friction object

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/m/model/plot/plot_basaldrag.m

    r9597 r9610  
    1717
    1818%compute exponents
    19 s=averaging(md,1./md.drag_p,0);
    20 r=averaging(md,md.drag_q./md.drag_p,0);
     19s=averaging(md,1./md.friction.p,0);
     20r=averaging(md,md.friction.q./md.friction.p,0);
    2121
    2222%compute horizontal velocity
     
    3030
    3131%compute basal drag
    32 drag=(max(md.constants.g*(md.rho_ice*md.thickness+md.rho_water*md.bed),0)).^r.*(md.drag_coefficient).^2.*ub.^s/1000;
     32drag=(max(md.constants.g*(md.rho_ice*md.thickness+md.rho_water*md.bed),0)).^r.*(md.friction.coefficient).^2.*ub.^s/1000;
    3333
    3434%Figure out if this is a Section plot
Note: See TracChangeset for help on using the changeset viewer.