[MITgcm-cvs] MITgcm/pkg/seaice CVS Commit

[Ian Fenty]

Update of /u/gcmpack/MITgcm/pkg/seaice
In directory forge:/tmp/cvs-serv982

Modified Files:
	seaice_growth.F 
Log Message:
Fixed 2 bugs in seaice_growth.F

Bug 1: calculation of saltFlux (and saltPlumeFlux) by removing dependence on now-defunct parameter ICE2WATR.
and slightly simplifying the equation.  Now if the sea ice salinity equals the local seawater salinity, the growth of sea ice
will not alter the seawater salinity.

old equation:
           saltFlux(I,J,bi,bj) =
       &            HEFFM(I,J,bi,bj)/SEAICE_deltaTtherm
       &            *SEAICE_salinity*salt(I,j,kSurface,bi,bj)
!      &            *tmpscal1*ICE2WATR*rhoConstFresh

new equation:
           saltFlux(I,J,bi,bj) =
       &            HEFFM(I,J,bi,bj)/SEAICE_deltaTtherm
       &            *SEAICE_salinity*salt(I,j,kSurface,bi,bj)
!      &            *tmpscal1*SEAICE_rhoIce

As ICE2WATR equaled SEAICE_rhoICE/rhoConst and not SEAICE_rhoICE/rhoConstFresh, verification experiments where
rhoConstFresh did not equal rhoConst need to be updated.

Bug 2: replaced hFacC with maskC in the calculation of the turbulent ocean-ice flux (found by Gael) (doesn't change results).


: 
: Modified Files:
: 	seaice_growth.F 
: ----------------------------------------------------------------------