| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_init_fixed.F |
235 |
STREAMICE_INIT_FIXED |
& temp_hmask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
241 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(temp_hmask,myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
248 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
416 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
417 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
418 |
STREAMICE_INIT_FIXED |
& temp_hmask(i-1,j,bi,bj).eq.1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
432 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i-1,j,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
434 |
STREAMICE_INIT_FIXED |
ELSEIF (temp_hmask(i,j,bi,bj).eq.-1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
442 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
443 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
457 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i+1,j,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
465 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
466 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
467 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j-1,bi,bj).eq.1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
46 |
STREAMICE_INIT_FIXED |
_RS temp_hmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/streamice_init_fixed.F |
481 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i,j-1,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
483 |
STREAMICE_INIT_FIXED |
ELSEIF (temp_hmask(i,j,bi,bj).eq.-1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
491 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
492 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
506 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i,j+1,bi,bj).eq.-1.0))) THEN |