| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/advect.F |
194 |
ADVECT |
DIFFA(i,j,bi,bj) = MIN( _dxF(i,j,bi,bj), _dyF(i,j,bi,bj) ) |
|
./pkg/seaice/advect.F |
200 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
226 |
ADVECT |
DIFFA(i,j,bi,bj) = - DIFFA(i,j,bi,bj)*DIFFA(i,j,bi,bj) |
|
./pkg/seaice/advect.F |
232 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
61 |
ADVECT |
_RL DIFFA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/diffus.F |
114 |
DIFFUS |
DELTXX = DIFFA(i,j,bi,bj) |
|
./pkg/seaice/diffus.F |
116 |
DIFFUS |
DELTYY = DIFFA(i,j,bi,bj) |
|
./pkg/seaice/diffus.F |
11 |
DIFFUS |
I DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/diffus.F |
38 |
DIFFUS |
_RL DIFFA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/diffus.F |
72 |
DIFFUS |
& * ( DIFFA(i,j,bi,bj)+DIFFA(i-1,j,bi,bj) )*HALF |
|
./pkg/seaice/diffus.F |
82 |
DIFFUS |
& * ( DIFFA(i,j,bi,bj)+DIFFA(i,j-1,bi,bj) )*HALF |