| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_driving_stress_fd.F |
248 |
STREAMICE_DRIVING_STRESS_FD |
& streamice_ufacemask(i+1,j,bi,bj).eq.2) THEN |
|
./pkg/streamice/streamice_driving_stress_fd.F |
285 |
STREAMICE_DRIVING_STRESS_FD |
& streamice_ufacemask(i,j,bi,bj).eq.2) THEN |
|
./pkg/streamice/streamice_forced_buttress.F |
139 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_ufacemask(i+1,j,bi,bj).eq.2.0) then |
|
./pkg/streamice/streamice_forced_buttress.F |
169 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_ufacemask(i,j,bi,bj).eq.2.0) then |