_RL convertPRECIP2HI, convertHI2PRECIP
d_HSNWbyRAIN(I,J) = convertPRECIP2HI * ICE2SNOW *
d_HFRWbyRAIN(I,J) = -convertPRECIP2HI *
d_HSNWbyRAIN(I,J)=convertPRECIP2HI*ICE2SNOW*
d_HFRWbyRAIN(I,J)=-convertPRECIP2HI*
& - convertPRECIP2HI *
convertPRECIP2HI=SEAICE_deltaTtherm*rhoConstFresh/SEAICE_rhoIce
convertHI2PRECIP = ONE/convertPRECIP2HI