ICEFRONTHeatCapacity_Cp = SHELFICEHeatCapacity_Cp
SHELFICEHeatCapacity_Cp = 2000.0 _d 0
& SHELFICElatentHeat, SHELFICEHeatCapacity_Cp,
& SHELFICEHeatCapacity_Cp