| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/advect.F |
16 |
ADVECT |
I iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
200 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
208 |
ADVECT |
& )*iceMsk(i,j,bi,bj) |
|
./pkg/seaice/advect.F |
232 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
240 |
ADVECT |
& )*iceMsk(i,j,bi,bj) |
|
./pkg/seaice/advect.F |
51 |
ADVECT |
_RL iceMsk (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/diffus.F |
11 |
DIFFUS |
I DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/diffus.F |
122 |
DIFFUS |
& *iceMsk(i+1,j,bi,bj) |
|
./pkg/seaice/diffus.F |
127 |
DIFFUS |
& *iceMsk(i-1,j,bi,bj) |
|
./pkg/seaice/diffus.F |
134 |
DIFFUS |
& * _dxG(i,j+1,bi,bj)*iceMsk(i,j+1,bi,bj) |
|
./pkg/seaice/diffus.F |
139 |
DIFFUS |
& * _dxG(i,j, bi,bj)*iceMsk(i,j-1,bi,bj) |
|
./pkg/seaice/diffus.F |
39 |
DIFFUS |
_RL iceMsk (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/diffus.F |
71 |
DIFFUS |
& * iceMsk(i,j,bi,bj)*iceMsk(i-1,j,bi,bj) |
|
./pkg/seaice/diffus.F |
81 |
DIFFUS |
& * iceMsk(i,j,bi,bj)*iceMsk(i,j-1,bi,bj) |
|
./pkg/thsice/thsice_get_precip.F |
137 |
THSICE_GET_PRECIP |
IF ( iceMsk(i,j,bi,bj).GT.0. _d 0 |
|
./pkg/thsice/thsice_get_precip.F |
16 |
THSICE_GET_PRECIP |
I iceMsk, locSST, |
|
./pkg/thsice/thsice_get_precip.F |
54 |
THSICE_GET_PRECIP |
_RL iceMsk (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/thsice/thsice_get_precip.F |
90 |
THSICE_GET_PRECIP |
IF ( iceMsk(i,j,bi,bj).GT.0. _d 0 |
|
./pkg/thsice/thsice_map_exf.F |
13 |
THSICE_MAP_EXF |
I iceMsk, locSST, |
|
./pkg/thsice/thsice_map_exf.F |
50 |
THSICE_MAP_EXF |
_RL iceMsk (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/thsice/thsice_map_exf.F |
99 |
THSICE_MAP_EXF |
IF ( iceMsk(i,j,bi,bj).GT.0. _d 0 |