Changeset 3762
- Timestamp:
- 05/17/10 08:41:23 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/classes/public/plot/plot_basaldrag.m
r2439 r3762 17 17 18 18 %compute exponents 19 s=averaging(md,1./md. p,0);20 r=averaging(md,md. p./md.q,0);19 s=averaging(md,1./md.drag_p,0); 20 r=averaging(md,md.drag_p./md.drag_q,0); 21 21 22 22 %compute horizontal velocity … … 30 30 31 31 %compute basal drag 32 drag=(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed)).^r.*(md.drag ).^2.*ub.^s/1000;32 drag=(md.g*(md.rho_ice*md.thickness+md.rho_water*md.bed)).^r.*(md.drag_coefficient).^2.*ub.^s/1000; 33 33 34 34 %Figure out if this is a Section plot
Note:
See TracChangeset
for help on using the changeset viewer.