| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
136 |
NO PROCEDURE |
COMMON/ICEFLUX/ saltWtrIce, frWtrIce |
|
./pkg/seaice/SEAICE.h |
142 |
NO PROCEDURE |
_RL frWtrIce (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_growth.F |
188 |
SEAICE_GROWTH |
frWtrIce(I,J,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
457 |
SEAICE_GROWTH |
frWtrIce(I,J,bi,bj) = |
|
./pkg/seaice/seaice_growth.F |
458 |
SEAICE_GROWTH |
& frWtrIce(I,J,bi,bj) - GHEFF(I,J)/(QS*ICE2SNOW) |
|
./pkg/seaice/seaice_growth.F |
466 |
SEAICE_GROWTH |
frWtrIce(I,J,bi,bj) = frWtrIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
593 |
SEAICE_GROWTH |
frWtrIce(I,J,bi,bj) = frWtrIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
633 |
SEAICE_GROWTH |
frWtrIce(I,J,bi,bj) = frWtrIce(I,J,bi,bj)-GHEFF(I,J) |
|
./pkg/seaice/seaice_growth.F |
659 |
SEAICE_GROWTH |
& + frWtrIce(I,J,bi,bj)*ICE2WATR/SEAICE_deltaTtherm |
|
./pkg/seaice/seaice_init_varia.F |
142 |
SEAICE_INIT_VARIA |
frWtrIce(i,j,bi,bj) = 0. _d 0 |