Changeset 7967
- Timestamp:
- 04/19/11 09:32:06 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m
r7667 r7967 38 38 md.spcvelocity(pos,1:3)=1; 39 39 40 md.spcwatercolumn=zeros(md.numberofgrids,2);41 pos=find(md.gridonboundary);42 md.spcwatercolumn(pos,1)=1;43 44 40 %Dirichlet Values 45 41 if (length(md.vx_obs)==md.numberofgrids & length(md.vy_obs)==md.numberofgrids) … … 49 45 disp(' boundary conditions for diagnostic model: spc set as zero'); 50 46 end 47 48 md.spcwatercolumn=zeros(md.numberofgrids,2); 49 pos=find(md.gridonboundary); 50 md.spcwatercolumn(pos,1)=1; 51 51 52 52 %segment on Neumann (Ice Front)
Note:
See TracChangeset
for help on using the changeset viewer.