| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/STREAMICE_CG.h |
20 |
NO PROCEDURE |
_RL taudx_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/STREAMICE_CG.h |
9 |
NO PROCEDURE |
& taudx_SI, taudy_SI, |
|
./pkg/streamice/streamice_driving_stress.F |
69 |
STREAMICE_DRIVING_STRESS |
taudx_SI(i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_driving_stress_fd.F |
482 |
STREAMICE_DRIVING_STRESS_FD |
taudx_SI(i,j,bi,bj) = -1.*taudx_SI(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
55 |
STREAMICE_DRIVING_STRESS_FD |
taudx_SI(i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
100 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+k,j+l,bi,bj) = taudx_SI(i+k,j+l,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
128 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+k,j+l,bi,bj) = taudx_SI(i+k,j+l,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
146 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+k,j+l,bi,bj) = taudx_SI(i+k,j+l,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
159 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+k,j+l,bi,bj) = taudx_SI(i+k,j+l,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
191 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+k,j+l,bi,bj) = taudx_SI(i+k,j+l,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
370 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i,j,bi,bj) = taudx_SI(i,j,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
372 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i,j+1,bi,bj) = taudx_SI(i,j+1,bi,bj) - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
380 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+1,j,bi,bj) = taudx_SI(i+1,j,bi,bj) + |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
382 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i+1,j+1,bi,bj) = taudx_SI(i+1,j+1,bi,bj) + |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
55 |
STREAMICE_DRIVING_STRESS_PPM |
taudx_SI(i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_forced_buttress.F |
146 |
STREAMICE_FORCED_BUTTRESS |
& taudx_SI(i+1,j+k,bi,bj) |
|
./pkg/streamice/streamice_forced_buttress.F |
149 |
STREAMICE_FORCED_BUTTRESS |
taudx_SI(i+1,j+k,bi,bj) = taudx_SI(i+1,j+k,bi,bj) + |
|
./pkg/streamice/streamice_forced_buttress.F |
160 |
STREAMICE_FORCED_BUTTRESS |
print *, "GOT HERE 1", taudx_SI(i+1,j+k,bi,bj) |
|
./pkg/streamice/streamice_forced_buttress.F |
175 |
STREAMICE_FORCED_BUTTRESS |
taudx_SI(i,j+k,bi,bj) = taudx_SI(i,j+k,bi,bj) - |
|
./pkg/streamice/streamice_forced_buttress.F |
200 |
STREAMICE_FORCED_BUTTRESS |
taudx_SI(i+k,j+1,bi,bj) = taudx_SI(i+k,j+1,bi,bj) + |
|
./pkg/streamice/streamice_forced_buttress.F |
219 |
STREAMICE_FORCED_BUTTRESS |
taudx_SI(i+k,j,bi,bj) = taudx_SI(i+k,j,bi,bj) - |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
129 |
STREAMICE_GET_VEL_RESID_ERR |
& taudx_SI(i,j,bi,bj))) ** streamice_err_norm |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
99 |
STREAMICE_GET_VEL_RESID_ERR |
& taudx_SI(i,j,bi,bj)) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
94 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
& taudx_SI(i,j,bi,bj)) |
|
./pkg/streamice/streamice_vel_phi.F |
86 |
STREAMICE_VEL_PHI |
& taudx_SI, |
|
./pkg/streamice/streamice_vel_solve.F |
222 |
STREAMICE_VEL_SOLVE |
& taudx_SI, |
|
./pkg/streamice/streamice_vel_solve.F |
79 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
91 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
74 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
86 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudx_SI , myThid ) |