File |
Line number |
Procedure |
Code |
./pkg/seaice/dynsolver.F |
170 |
DYNSOLVER |
phiSurf(i,j) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj) |
./pkg/seaice/dynsolver.F |
178 |
DYNSOLVER |
phiSurf(i,j) = phiSurf(i,j) |
./pkg/seaice/dynsolver.F |
187 |
DYNSOLVER |
phiSurf(i,j) = phiSurf(i,j) |
./pkg/seaice/dynsolver.F |
198 |
DYNSOLVER |
& *( (phiSurf(i, j )-phiSurf(i-1, j ))*maskW(i, j ,1,bi,bj) |
./pkg/seaice/dynsolver.F |
199 |
DYNSOLVER |
& +(phiSurf(i,j-1)-phiSurf(i-1,j-1))*maskW(i,j-1,1,bi,bj) |
./pkg/seaice/dynsolver.F |
203 |
DYNSOLVER |
& *( (phiSurf( i ,j)-phiSurf( i ,j-1))*maskS( i ,j,1,bi,bj) |
./pkg/seaice/dynsolver.F |
204 |
DYNSOLVER |
& +(phiSurf(i-1,j)-phiSurf(i-1,j-1))*maskS(i-1,j,1,bi,bj) |
./pkg/seaice/dynsolver.F |
50 |
DYNSOLVER |
_RL phiSurf(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_dynsolver.F |
209 |
SEAICE_DYNSOLVER |
phiSurf(i,j) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
217 |
SEAICE_DYNSOLVER |
phiSurf(i,j) = phiSurf(i,j) |
./pkg/seaice/seaice_dynsolver.F |
226 |
SEAICE_DYNSOLVER |
phiSurf(i,j) = phiSurf(i,j) |
./pkg/seaice/seaice_dynsolver.F |
257 |
SEAICE_DYNSOLVER |
& *( phiSurf(i,j)-phiSurf(i-1,j) ) |
./pkg/seaice/seaice_dynsolver.F |
260 |
SEAICE_DYNSOLVER |
& *( phiSurf(i,j)-phiSurf(i,j-1) ) |
./pkg/seaice/seaice_dynsolver.F |
64 |
SEAICE_DYNSOLVER |
_RL phiSurf(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |