LOGICAL SHELFICEadvDiffHeatFlux
& SHELFICEadvDiffHeatFlux,
SHELFICEadvDiffHeatFlux = .FALSE.
IF ( SHELFICEadvDiffHeatFlux ) dFac = 1. _d 0