--- MITgcm/pkg/thsice/thsice_ini_vars.F	2004/12/17 04:29:07	1.3
+++ MITgcm/pkg/thsice/thsice_ini_vars.F	2005/01/31 19:37:06	1.4
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/thsice/thsice_ini_vars.F,v 1.3 2004/12/17 04:29:07 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/thsice/thsice_ini_vars.F,v 1.4 2005/01/31 19:37:06 jmc Exp $
 C $Name:  $
 
 #include "THSICE_OPTIONS.h"
@@ -67,6 +67,7 @@
             sHeating(i,j,bi,bj) = 0. _d 0
             flxCndBt(i,j,bi,bj) = 0. _d 0
             snowPrc(i,j,bi,bj)  = 0. _d 0
+            siceAlb(i,j,bi,bj)  = 0. _d 0
 #ifdef COUPLE_MODEL
             dFdT(i,j,bi,bj)     = 0. _d 0
 #endif