Skip to content
Snippets Groups Projects
Commit d38b0ee0 authored by KeitaYoshioka's avatar KeitaYoshioka Committed by Dmitri Naumov
Browse files

[PL] Stagg. loop; Info output for tracking iters.

parent dfea68d0
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
ProcessLib/UncoupledProcessesTimeLoop.cpp
+ 5
− 0
View file @ d38b0ee0
...@@ -736,6 +736,7 @@ bool UncoupledProcessesTimeLoop::solveCoupledEquationSystemsByStaggeredScheme( ...@@ -736,6 +736,7 @@ bool UncoupledProcessesTimeLoop::solveCoupledEquationSystemsByStaggeredScheme(
bool nonlinear_solver_succeeded = true; bool nonlinear_solver_succeeded = true;
coupling_iteration_converged = true; coupling_iteration_converged = true;
int process_id = 0; int process_id = 0;
int const last_process_id = _per_process_data.size() - 1;
for (auto& process_data : _per_process_data) for (auto& process_data : _per_process_data)
{ {
if (process_data->skip_time_stepping) if (process_data->skip_time_stepping)
...@@ -801,6 +802,10 @@ bool UncoupledProcessesTimeLoop::solveCoupledEquationSystemsByStaggeredScheme( ...@@ -801,6 +802,10 @@ bool UncoupledProcessesTimeLoop::solveCoupledEquationSystemsByStaggeredScheme(
if (global_coupling_iteration > 0) if (global_coupling_iteration > 0)
{ {
MathLib::LinAlg::axpy(x_old, -1.0, x); // save dx to x_old MathLib::LinAlg::axpy(x_old, -1.0, x); // save dx to x_old
if (process_id == last_process_id)
INFO(
"------- Checking convergence criterion for coupled "
"solution -------");
_global_coupling_conv_crit[process_id]->checkDeltaX(x_old, x); _global_coupling_conv_crit[process_id]->checkDeltaX(x_old, x);
coupling_iteration_converged = coupling_iteration_converged =
coupling_iteration_converged && coupling_iteration_converged &&
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment