| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_init_fixed.F |
249 |
STREAMICE_INIT_FIXED |
& temp_hmask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
255 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(temp_hmask,myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
262 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj) .eq. 1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
430 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
431 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0 .or. |
|
./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 |
446 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i-1,j,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
448 |
STREAMICE_INIT_FIXED |
ELSEIF (temp_hmask(i,j,bi,bj).eq.-1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
456 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
457 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
45 |
STREAMICE_INIT_FIXED |
_RS temp_hmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/streamice_init_fixed.F |
471 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i+1,j,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
479 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
480 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0 .or. |
|
./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 |
495 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i,j-1,bi,bj).eq.-1.0))) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
497 |
STREAMICE_INIT_FIXED |
ELSEIF (temp_hmask(i,j,bi,bj).eq.-1.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
505 |
STREAMICE_INIT_FIXED |
IF (temp_hmask(i,j,bi,bj).eq.1.0 .or. |
|
./pkg/streamice/streamice_init_fixed.F |
506 |
STREAMICE_INIT_FIXED |
& temp_hmask(i,j,bi,bj).eq.0.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
520 |
STREAMICE_INIT_FIXED |
& (temp_hmask(i,j+1,bi,bj).eq.-1.0))) THEN |