Index: /issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m
===================================================================
--- /issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m	(revision 7647)
+++ /issm/trunk/src/m/utils/BC/SetMarineIceSheetBC.m	(revision 7648)
@@ -37,4 +37,8 @@
 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