| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/advect.F |
134 |
ADVECT |
& *(QUART/(DXTICE(I+1,J,bi,bj)*CSTICE(I,J+1,bi,bj))) |
|
./pkg/seaice/advect.F |
170 |
ADVECT |
DIFFA(I,J,bi,bj)=DIFF1*MIN(DXTICE(I,J,bi,bj) |
|
./pkg/seaice/advect.F |
194 |
ADVECT |
DIFFA(I,J,bi,bj)=-(MIN(DXTICE(I,J,bi,bj)*CSTICE(I,J,bi,bj) |
|
./pkg/seaice/advect.F |
93 |
ADVECT |
& *(QUART/(DXTICE(I+1,J,bi,bj)*CSTICE(I,J+1,bi,bj))) |
|
./pkg/seaice/diffus.F |
50 |
DIFFUS |
DELTXX=DELTXX1/(DXTICE(I,J,bi,bj)*DXTICE(I,J,bi,bj) |
|
./pkg/seaice/SEAICE_GRID.h |
45 |
NO PROCEDURE |
_RL DXTICE (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |
|
./pkg/seaice/SEAICE_GRID.h |
52 |
NO PROCEDURE |
& DXTICE, DXUICE, DYTICE, DYUICE |
|
./pkg/seaice/dynsolver.F |
188 |
DYNSOLVER |
E11(I,J,bi,bj)=HALF/(DXTICE(I,J,bi,bj)*CSTICE(I,J,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
200 |
DYNSOLVER |
& +HALF/(DXTICE(I,J,bi,bj)*CSTICE(I,J,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
295 |
DYNSOLVER |
E11(I,J,bi,bj)=HALF/(DXTICE(I,J,bi,bj)*CSTICE(I,J,bi,bj)) |
|
./pkg/seaice/dynsolver.F |
307 |
DYNSOLVER |
& +HALF/(DXTICE(I,J,bi,bj)*CSTICE(I,J,bi,bj)) |
|
./pkg/seaice/seaice_init.F |
114 |
SEAICE_INIT |
DXTICE(i,j,bi,bj)=dxF(i,j,bi,bj)*RECIP_CSTICE(i,j,bi,bj) |
|
./pkg/seaice/seaice_init.F |
149 |
SEAICE_INIT |
DXTICE(i,j,bi,bj) = dxF(i,j,bi,bj) |
|
./pkg/seaice/seaice_init.F |
177 |
SEAICE_INIT |
IF(DXTICE(i,j,bi,bj).EQ.0) |
|
./pkg/seaice/seaice_init.F |
178 |
SEAICE_INIT |
& DXTICE(i,j,bi,bj)=DXTICE(1,j,bi,bj) |
|
./pkg/seaice/seaice_init.F |
183 |
SEAICE_INIT |
IF(DXTICE(i,j,bi,bj).EQ.0) |
|
./pkg/seaice/seaice_init.F |
184 |
SEAICE_INIT |
& DXTICE(i,j,bi,bj)=DXTICE(sNx,j,bi,bj) |
|
./pkg/seaice/seaice_init.F |
191 |
SEAICE_INIT |
IF(DXTICE(i,j,bi,bj).EQ.0) |
|
./pkg/seaice/seaice_init.F |
192 |
SEAICE_INIT |
& DXTICE(i,j,bi,bj)=DXTICE(i,1,bi,bj) |
|
./pkg/seaice/seaice_init.F |
199 |
SEAICE_INIT |
IF(DXTICE(i,j,bi,bj).EQ.0) |
|
./pkg/seaice/seaice_init.F |
200 |
SEAICE_INIT |
& DXTICE(i,j,bi,bj)=DXTICE(i,sNy,bi,bj) |
|
./pkg/seaice/seaice_init.F |
260 |
SEAICE_INIT |
CALL PLOT_FIELD_XYRL( DXTICE , 'Current DXTICE ' , |