& SHELFICEheatTransCoeff, SHELFICEsaltTransCoeff,
_RL SHELFICEsaltTransCoeff
shiTransCoeffS(i,j,bi,bj) = SHELFICEsaltTransCoeff
IF ( SHELFICEsaltTransCoeff .EQ. UNSET_RL )
& SHELFICEsaltTransCoeff =
& SHELFICEsaltTransCoeff,
SHELFICEsaltTransCoeff = UNSET_RL
& SHELFICEsaltTransCoeff