File |
Line number |
Procedure |
Code |
./pkg/streamice/streamice_driving_stress_fd.F |
399 |
STREAMICE_DRIVING_STRESS_FD |
& streamice_vfacemask(i,j+1,bi,bj).eq.2) THEN |
./pkg/streamice/streamice_driving_stress_fd.F |
436 |
STREAMICE_DRIVING_STRESS_FD |
& streamice_vfacemask(i,j,bi,bj).eq.2) THEN |
./pkg/streamice/streamice_forced_buttress.F |
189 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_vfacemask(i,j+1,bi,bj).eq.2.0) then |
./pkg/streamice/streamice_forced_buttress.F |
209 |
STREAMICE_FORCED_BUTTRESS |
if (streamice_vfacemask(i,j,bi,bj).eq.2.0) then |