| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_advdiff.F |
156 |
THSICE_ADVDIFF |
maskOce(i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_advdiff.F |
157 |
THSICE_ADVDIFF |
IF ( hOceMxL(i,j,bi,bj).GT.0. ) maskOce(i,j) = 1. |
|
./pkg/thsice/thsice_advdiff.F |
177 |
THSICE_ADVDIFF |
I maskOce, |
|
./pkg/thsice/thsice_advdiff.F |
188 |
THSICE_ADVDIFF |
& *maskOce(i-1,j)*maskOce(i,j) |
|
./pkg/thsice/thsice_advdiff.F |
194 |
THSICE_ADVDIFF |
& *maskOce(i,j-1)*maskOce(i,j) |
|
./pkg/thsice/thsice_advdiff.F |
211 |
THSICE_ADVDIFF |
I uTrIce, vTrIce, maskOce, thSIce_deltaT, areaEpsil, |
|
./pkg/thsice/thsice_advdiff.F |
224 |
THSICE_ADVDIFF |
I uTrans, vTrans, maskOce, thSIce_deltaT, areaEpsil, |
|
./pkg/thsice/thsice_advdiff.F |
242 |
THSICE_ADVDIFF |
I uTrans, vTrans, maskOce, thSIce_deltaT, areaEpsil, |
|
./pkg/thsice/thsice_advdiff.F |
322 |
THSICE_ADVDIFF |
I uTrIce, vTrIce, maskOce, thSIce_deltaT, vol_Epsil, |
|
./pkg/thsice/thsice_advdiff.F |
359 |
THSICE_ADVDIFF |
I uTrIce, vTrIce, maskOce, thSIce_deltaT, vol_Epsil, |
|
./pkg/thsice/thsice_advdiff.F |
88 |
THSICE_ADVDIFF |
_RS maskOce (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |