File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE_GRID.h |
48 |
NO PROCEDURE |
_RL DYUICE (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 |
261 |
DYNSOLVER |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)-QUART/DYUICE(I,J,bi,bj) |
./pkg/seaice/dynsolver.F |
368 |
DYNSOLVER |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)-QUART/DYUICE(I,J,bi,bj) |
./pkg/seaice/lsr.F |
117 |
LSR |
DELY2(I,J,bi,bj)=HALF/(DYUICE(I,J,bi,bj)*DYUICE(I,J,bi,bj)) |
./pkg/seaice/lsr.F |
118 |
LSR |
DELXY(I,J,bi,bj)=HALF/(DXUICE(I,J,bi,bj)*DYUICE(I,J,bi,bj)) |
./pkg/seaice/lsr.F |
120 |
LSR |
DELYR(I,J,bi,bj)=HALF/(DYUICE(I,J,bi,bj)*RADIUS) |
./pkg/seaice/seaice_init.F |
117 |
SEAICE_INIT |
DYUICE(i,j,bi,bj)=dyU(i,j,bi,bj) |
./pkg/seaice/seaice_init.F |
266 |
SEAICE_INIT |
CALL PLOT_FIELD_XYRL( DYUICE , 'Current DYUICE ' , |