Changeset 7648

Timestamp:

03/15/11 09:06:20 (14 years ago)

Author:

Eric.Larour

Message:

new boundary conditions for hydrology runs

File:

• issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m (modified) (1 diff)

issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m

@@ -37 +37 @@
 md.spcvelocity=zeros(md.numberofgrids,6);
 md.spcvelocity(pos,1:3)=1;
+
+md.spcwatercolumn=zeros(md.numberofgrids,2);
+pos=find(md.gridonboundary); 
+md.spcwatercolumn(pos,:)=[1 0];
 
 %Dirichlet Values