| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_init_fixed.F |
36 |
STREAMICE_INIT_FIXED |
INTEGER maskFlag, hmaskFlag |
|
./pkg/streamice/streamice_init_fixed.F |
421 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_ufacemask(i,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
422 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
426 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
428 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
430 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
431 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
446 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_ufacemask(i+1,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
447 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
449 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
451 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
453 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
455 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
456 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
470 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_vfacemask(i,j,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
471 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
473 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
475 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
477 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
479 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
480 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_init_fixed.F |
495 |
STREAMICE_INIT_FIXED |
maskFlag=INT(temp_vfacemask(i,j+1,bi,bj)) |
|
./pkg/streamice/streamice_init_fixed.F |
496 |
STREAMICE_INIT_FIXED |
IF (maskFlag.eq.2) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
498 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.4.0) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
500 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.3) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
502 |
STREAMICE_INIT_FIXED |
ELSEIF (maskFlag.eq.1) THEN |
|
./pkg/streamice/streamice_init_fixed.F |
504 |
STREAMICE_INIT_FIXED |
ELSEIF ((maskFlag.eq.0) .or. |
|
./pkg/streamice/streamice_init_fixed.F |
505 |
STREAMICE_INIT_FIXED |
& ((maskFlag.eq.-1) .and. |
|
./pkg/streamice/streamice_velmask_upd.F |
102 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.4) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
108 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.0) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
114 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.1) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
122 |
STREAMICE_VELMASK_UPD |
maskFlag=INT(STREAMICE_vfacemask_bdry(i,j+kj,bi,bj)) |
|
./pkg/streamice/streamice_velmask_upd.F |
123 |
STREAMICE_VELMASK_UPD |
IF (maskFlag.EQ.3) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
133 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.2) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
137 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.4) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
143 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.0) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
149 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.1) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
41 |
STREAMICE_VELMASK_UPD |
INTEGER maskFlag, myThidCopy |
|
./pkg/streamice/streamice_velmask_upd.F |
87 |
STREAMICE_VELMASK_UPD |
maskFlag=INT(STREAMICE_ufacemask_bdry(i+ki,j,bi,bj)) |
|
./pkg/streamice/streamice_velmask_upd.F |
88 |
STREAMICE_VELMASK_UPD |
IF (maskFlag.EQ.3) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
98 |
STREAMICE_VELMASK_UPD |
ELSE IF (maskFlag.EQ.2) THEN |