& ICEFRONTthetaSurface
_RL ICEFRONTthetaSurface
& ICEFRONTthetaSurface,
ICEFRONTthetaSurface = SHELFICEthetaSurface
ICEFRONTthetaSurface = - 20.0 _d 0
thetaICE = ICEFRONTthetaSurface*