| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
57 |
STREAMICE_APPLY_FLUX_CTRL |
IF (streamice_umask(i,j,bi,bj).eq.3.0 .OR. |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
64 |
STREAMICE_APPLY_FLUX_CTRL |
IF (streamice_umask(i,j,bi,bj).eq.3.0 |
|
./pkg/streamice/streamice_driving_stress.F |
76 |
STREAMICE_DRIVING_STRESS |
IF (streamice_umask(i,j,bi,bj).eq.1.0) THEN |
|
./pkg/streamice/streamice_forced_buttress.F |
119 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_umask(i+k,j+1,bi,bj).eq.1.0) then |
|
./pkg/streamice/streamice_forced_buttress.F |
138 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_umask(i+k,j,bi,bj).eq.1.0) then |
|
./pkg/streamice/streamice_forced_buttress.F |
77 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_umask(i+1,j+k,bi,bj).eq.1.0) then |
|
./pkg/streamice/streamice_forced_buttress.F |
99 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_umask(i,j+k,bi,bj).eq.1.0) then |
|
./pkg/streamice/streamice_velmask_upd.F |
201 |
STREAMICE_VELMASK_UPD |
IF(streamice_umask(i,j,bi,bj).eq.-1.0) THEN |
|
./pkg/streamice/streamice_velmask_upd.F |
202 |
STREAMICE_VELMASK_UPD |
streamice_umask(i,j,bi,bj)=0.0 |