| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
347 |
STREAMICE_DRIVING_STRESS_PPM |
neu_val = .5 * gravity * |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
351 |
STREAMICE_DRIVING_STRESS_PPM |
neu_val = .5 * gravity * |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
356 |
STREAMICE_DRIVING_STRESS_PPM |
neu_val = .5 * gravity * |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
371 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dyG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
373 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dyG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
381 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dyG(i+1,j,bi,bj)*(neu_val+streamice_addl_backstress) ! note negative sign is due to direction of normal vector |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
383 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dyG(i+1,j,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
391 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
393 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
401 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j+1,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
403 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j+1,bi,bj)*(neu_val+streamice_addl_backstress) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
42 |
STREAMICE_DRIVING_STRESS_PPM |
_RL sx, sy, diffx, diffy, neu_val |