include file: C_SICEHC 9
C*L-----------COMDECK C_SICEHC FOR SUBROUTINE IMPL_CAL----------           C_SICEHC.2      
C AI  = reciprocal effective areal heat capacity of sea-ice,               C_SICEHC.3      
C          ( 1 / (J per sq m per K)).                                      C_SICEHC.4      
      REAL AI                                                              C_SICEHC.5      
                                                                           C_SICEHC.6      
      PARAMETER(AI  = 4.8E-6)                                              C_SICEHC.7      
C*----------------------------------------------------------------------   C_SICEHC.8