| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
35 |
STREAMICE_GET_FP_ERR_OAD |
_RL err_tempu, err_tempv |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
58 |
STREAMICE_GET_FP_ERR_OAD |
err_tempv = 0. _d 0 |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
64 |
STREAMICE_GET_FP_ERR_OAD |
err_tempv = MAX( err_tempu, |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
67 |
STREAMICE_GET_FP_ERR_OAD |
IF (err_tempv .ge. err_max) err_max = err_tempv |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
35 |
STREAMICE_GET_VEL_FP_ERR |
_RL err_tempu, err_tempv |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
58 |
STREAMICE_GET_VEL_FP_ERR |
err_tempv = 0. _d 0 |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
68 |
STREAMICE_GET_VEL_FP_ERR |
err_tempv = MAX( err_tempu, |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
75 |
STREAMICE_GET_VEL_FP_ERR |
IF (err_tempv .ge. err_max) err_max = err_tempv |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
102 |
STREAMICE_GET_VEL_RESID_ERR |
err_tempv = MAX( err_tempu, |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
106 |
STREAMICE_GET_VEL_RESID_ERR |
IF (err_tempv .ge. err_max) THEN |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
107 |
STREAMICE_GET_VEL_RESID_ERR |
err_max = err_tempv |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
34 |
STREAMICE_GET_VEL_RESID_ERR |
_RL err_tempu, err_tempv |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
95 |
STREAMICE_GET_VEL_RESID_ERR |
err_tempv = 0. _d 0 |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
101 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
IF (err_tempv .ge. err_max) THEN |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
102 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
err_max = err_tempv |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
44 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
_RL err_tempu, err_tempv |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
90 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
err_tempv = 0. _d 0 |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
97 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
err_tempv = MAX( err_tempu, |
|
./pkg/streamice/streamice_vel_solve.F |
55 |
STREAMICE_VEL_SOLVE |
_RL err_max, err_tempu, err_tempv, err_init, area, err_max_fp |