public override void Solve()
{
InitializeLogs();
DateTime start = DateTime.Now;
UpdateInternalVectors();
for (int increment = 0; increment < numIncrements; increment++)
{
double errorNorm = 0;
ClearIncrementalSolutionVector();
UpdateRhs(increment);
ScaleSubdomainConstraints(increment);
double firstError = 0;
int iteration = 0;
for (iteration = 0; iteration < maxIterationsPerIncrement; iteration++)
{
AddEquivalentNodalLoadsToRHS(increment, iteration);
solver.Solve();
Dictionary <int, IVector> internalRhsVectors = CalculateInternalRhs(increment, iteration);
errorNorm = UpdateResidualForcesAndNorm(increment, internalRhsVectors); // This also sets the rhs vectors in linear systems.
//Console.WriteLine($"Increment {increment}, iteration {iteration}: norm2(error) = {errorNorm}");
if (iteration == 0)
{
firstError = errorNorm;
}
if (TotalDisplacementsPerIterationLog != null)
{
TotalDisplacementsPerIterationLog.StoreDisplacements(uPlusdu);
}
if (errorNorm < residualTolerance)
{
foreach (var subdomainLogPair in IncrementalLogs)
{
int subdomainID = subdomainLogPair.Key;
TotalLoadsDisplacementsPerIncrementLog log = subdomainLogPair.Value;
log.LogTotalDataForIncrement(increment, iteration, errorNorm,
uPlusdu[subdomainID], internalRhsVectors[subdomainID]);
}
break;
}
SplitResidualForcesToSubdomains();
if ((iteration + 1) % numIterationsForMatrixRebuild == 0)
{
provider.Reset();
BuildMatrices();
}
}
Debug.WriteLine("NR {0}, first error: {1}, exit error: {2}", iteration, firstError, errorNorm);
SaveMaterialStateAndUpdateSolution();
}
// TODO: Logging should be done at each iteration. And it should be done using pull observers
DateTime end = DateTime.Now;
StoreLogResults(start, end);
}
public override void Solve()
{
InitializeLogs();
DateTime start = DateTime.Now;
UpdateInternalVectors();//TODOMaria this divides the externally applied load by the number of increments and scatters it to all subdomains and stores it in the class subdomain dictionary and total external load vector
for (int increment = 0; increment < numIncrements; increment++)
{
double errorNorm = 0;
ClearIncrementalSolutionVector(); //TODOMaria this sets du to 0
UpdateRhs(increment); //TODOMaria this copies the residuals stored in the class dictionary to the subdomains
double firstError = 0;
int iteration = 0;
for (iteration = 0; iteration < maxIterationsPerIncrement; iteration++)
{
if (iteration == 0)
{
var vecs = CalculateInternalRhs(increment, iteration);
UpdateResidualForcesAndNorm(increment, vecs);
}
if (iteration == maxIterationsPerIncrement - 1)
{
return;
}
if (Double.IsNaN(errorNorm))
{
return;
}
solver.Solve();
//double rhsNormIt = solver.LinearSystems.First().Value.RhsVector.Norm2();
//double xNormIt = solver.LinearSystems.First().Value.Solution.Norm2();
Dictionary <int, IVector> internalRhsVectors = CalculateInternalRhs(increment, iteration);
Console.WriteLine($"incre:{increment}, iter:{iteration}, total Solution Norm{uPlusdu[0].Norm2()}");
Debug.WriteLine($"incre:{increment}, iter:{iteration}, total Solution Norm{uPlusdu[0].Norm2()}");
double residualNormCurrent = UpdateResidualForcesAndNorm(increment, internalRhsVectors); // This also sets the rhs vectors in linear systems.
errorNorm = globalRhsNormInitial != 0 ? residualNormCurrent / globalRhsNormInitial : 0; // (rhsNorm*increment/increments) : 0;//TODOMaria this calculates the internal force vector and subtracts it from the external one (calculates the residual)
//Console.WriteLine($"Increment {increment}, iteration {iteration}: norm2(error) = {errorNorm}");
if (iteration == 0)
{
firstError = errorNorm;
}
if (TotalDisplacementsPerIterationLog != null)
{
TotalDisplacementsPerIterationLog.StoreDisplacements(uPlusdu);
}
if (errorNorm < residualTolerance)
{
previousConvergedUplusdUSolution = uPlusdu[0];
foreach (var subdomainLogPair in IncrementalLogs)
{
int subdomainID = subdomainLogPair.Key;
TotalLoadsDisplacementsPerIncrementLog log = subdomainLogPair.Value;
log.LogTotalDataForIncrement(increment, iteration, errorNorm,
uPlusdu[subdomainID], internalRhsVectors[subdomainID]);
}
break;
}
SplitResidualForcesToSubdomains(); //TODOMaria scatter residuals to subdomains
if ((iteration + 1) % numIterationsForMatrixRebuild == 0) // Matrix rebuilding should be handled in another way. E.g. in modified NR, it must be done at each increment.
{
provider.Reset();
BuildMatrices();
}
}
//double rhsNormInc = solver.LinearSystems.First().Value.RhsVector.Norm2();
//double xNormInc = solver.LinearSystems.First().Value.Solution.Norm2();
Debug.WriteLine("NR {0}, first error: {1}, exit error: {2}", iteration, firstError, errorNorm);
SaveMaterialStateAndUpdateSolution();
}
// ClearMaterialStresses();
// TODO: Logging should be done at each iteration. And it should be done using pull observers
DateTime end = DateTime.Now;
StoreLogResults(start, end);
}
/// <summary>
/// Solves the nonlinear equations and calculates the displacements vector.
/// </summary>
public override void Solve()
{
InitializeLogs();
DateTime start = DateTime.Now;
UpdateInternalVectors();
for (int increment = 0; increment < numIncrements; increment++)
{
double errorNorm = 0;
ClearIncrementalSolutionVector();
UpdateRhs(increment);
double firstError = 0;
int iteration = 0;
for (iteration = 0; iteration < maxIterationsPerIncrement; iteration++)
{
if (iteration == maxIterationsPerIncrement - 1)
{
return;
}
if (Double.IsNaN(errorNorm))
{
return;
}
solver.Solve();
Dictionary <int, IVector> internalRhsVectors = CalculateInternalRhs(increment, iteration);
double residualNormCurrent = UpdateResidualForcesAndNorm(increment, internalRhsVectors);
errorNorm = globalRhsNormInitial != 0 ? residualNormCurrent / globalRhsNormInitial : 0;
if (iteration == 0)
{
firstError = errorNorm;
}
if (TotalDisplacementsPerIterationLog != null)
{
TotalDisplacementsPerIterationLog.StoreDisplacements(uPlusdu);
}
if (errorNorm < residualTolerance)
{
foreach (var subdomainLogPair in IncrementalLogs)
{
int subdomainID = subdomainLogPair.Key;
TotalLoadsDisplacementsPerIncrementLog log = subdomainLogPair.Value;
log.LogTotalDataForIncrement(increment, iteration, errorNorm,
uPlusdu[subdomainID], internalRhsVectors[subdomainID]);
}
break;
}
SplitResidualForcesToSubdomains();
if ((iteration + 1) % numIterationsForMatrixRebuild == 0)
{
provider.Reset();
BuildMatrices();
}
}
Debug.WriteLine("NR {0}, first error: {1}, exit error: {2}", iteration, firstError, errorNorm);
SaveMaterialStateAndUpdateSolution();
}
DateTime end = DateTime.Now;
StoreLogResults(start, end);
}