File |
Line number |
Procedure |
Code |
./pkg/streamice/adstreamice_cg_solve.F |
75 |
ADSTREAMICE_CG_SOLVE |
_RL dot_p1, dot_p2, alpha_k, beta_k, resid, resid_0 |
./pkg/streamice/streamice_cg_solve.F |
215 |
STREAMICE_CG_SOLVE |
resid_0 = sqrt(dot_p1) |
./pkg/streamice/streamice_cg_solve.F |
229 |
STREAMICE_CG_SOLVE |
& resid_0 |
./pkg/streamice/streamice_cg_solve.F |
262 |
STREAMICE_CG_SOLVE |
resid = resid_0 |
./pkg/streamice/streamice_cg_solve.F |
284 |
STREAMICE_CG_SOLVE |
if (resid .gt. tolerance*resid_0) then |
./pkg/streamice/streamice_cg_solve.F |
69 |
STREAMICE_CG_SOLVE |
_RL dot_p1, dot_p2, alpha_k, beta_k, resid, resid_0 |
./pkg/streamice/streamice_cg_solve_matfree.F |
147 |
STREAMICE_CG_SOLVE_MATFREE |
resid_0 = sqrt(dot_p1) |
./pkg/streamice/streamice_cg_solve_matfree.F |
178 |
STREAMICE_CG_SOLVE_MATFREE |
resid = resid_0 |
./pkg/streamice/streamice_cg_solve_matfree.F |
200 |
STREAMICE_CG_SOLVE_MATFREE |
if (resid .gt. tolerance*resid_0) then |
./pkg/streamice/streamice_cg_solve_matfree.F |
48 |
STREAMICE_CG_SOLVE_MATFREE |
_RL dot_p1, dot_p2, alpha_k, beta_k, resid, resid_0 |
./pkg/streamice/streamice_cg_solve_petsc.F |
74 |
STREAMICE_CG_SOLVE_PETSC |
_RL dot_p1, dot_p2, alpha_k, beta_k, resid, resid_0 |