| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_advection.F |
18 |
THSICE_ADVECTION |
I uTrans, vTrans, maskOc, deltaTadvect, iceEps, |
|
./pkg/thsice/thsice_advection.F |
220 |
THSICE_ADVECTION |
maskLocW(i,j) = MIN( maskOc(i-1,j), maskOc(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
231 |
THSICE_ADVECTION |
maskLocS(i,j) = MIN( maskOc(i,j-1), maskOc(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
241 |
THSICE_ADVECTION |
maskLocC(i,j) = maskOc(i,j) |
|
./pkg/thsice/thsice_advection.F |
85 |
THSICE_ADVECTION |
_RS maskOc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_diffusion.F |
11 |
THSICE_DIFFUSION |
I maskOc, |
|
./pkg/thsice/thsice_diffusion.F |
47 |
THSICE_DIFFUSION |
_RS maskOc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_diffusion.F |
86 |
THSICE_DIFFUSION |
& * maskOc(i-1,j)*maskOc(i,j) |
|
./pkg/thsice/thsice_diffusion.F |
97 |
THSICE_DIFFUSION |
& *maskOc(i,j-1)*maskOc(i,j) |