| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_init_fixed.F |
37 |
STREAMICE_INIT_FIXED |
INTEGER maskFlag, hmaskFlag |
|
./pkg/streamice/streamice_init_fixed.F |
435 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_ufacemask(i,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
436 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
440 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
442 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
444 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
445 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
460 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_ufacemask(i+1,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
461 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
463 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
465 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
467 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
469 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
470 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
484 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_vfacemask(i,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
485 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
487 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
489 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
491 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
493 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
494 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
509 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_vfacemask(i,j+1,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
510 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
512 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
514 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
516 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
518 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
519 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_velmask_upd.F |
101 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.2) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
105 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.4) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
111 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.0) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
117 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.1) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
125 |
STREAMICE_VELMASK_UPD |
maskFlag=INT(STREAMICE_vfacemask_bdry(i,j+kj,bi,bj)) |
|
./pkg/streamice/streamice_velmask_upd.F |
126 |
STREAMICE_VELMASK_UPD |
IF (maskFlag.EQ.3) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
136 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.2) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
140 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.4) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
146 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.0) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
152 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.1) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
44 |
STREAMICE_VELMASK_UPD |
INTEGER maskFlag, myThidCopy |
|
./pkg/streamice/streamice_velmask_upd.F |
90 |
STREAMICE_VELMASK_UPD |
maskFlag=INT(STREAMICE_ufacemask_bdry(i+ki,j,bi,bj)) |
|
./pkg/streamice/streamice_velmask_upd.F |
91 |
STREAMICE_VELMASK_UPD |
IF (maskFlag.EQ.3) THEN |