applications/solvers/solidMechanics/deprecatedSolvers/newContactStressFoam/newContactStressFoam.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | foam-extend: Open Source CFD
   4    \\    /   O peration     | Version:     3.2
   5     \\  /    A nd           | Web:         http://www.foam-extend.org
   6      \\/     M anipulation  | For copyright notice see file Copyright
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of foam-extend.
  10
  11     foam-extend is free software: you can redistribute it and/or modify it
  12     under the terms of the GNU General Public License as published by the
  13     Free Software Foundation, either version 3 of the License, or (at your
  14     option) any later version.
  15
  16     foam-extend is distributed in the hope that it will be useful, but
  17     WITHOUT ANY WARRANTY; without even the implied warranty of
  18     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19     General Public License for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with foam-extend.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 Application
  25     stressedFoam
  26
  27 Description
  28     Transient/steady-state solver for solid bodies in contact.
  29
  30     Solves for the displacement vector field U, also generating the
  31     stress tensor field sigma.
  32
  33 \*---------------------------------------------------------------------------*/
  34
  35 #include "fvCFD.H"
  36 #include "rheologyModel.H"
  37 #include "contactProblem.H"
  38 #include "componentReferenceList.H"
  39
  40 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  41
  42 int main(int argc, char *argv[])
  43 {
  44
  45 #   include "setRootCase.H"
  46
  47 #   include "createTime.H"
  48 #   include "createMesh.H"
  49 #   include "createFields.H"
  50
  51 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  52
  53     Info<< "\nCalculating displacement field\n" << endl;
  54
  55     volScalarField rho = rheology.rho();
  56
  57     // Force n-sqaured projection
  58 //     polyPatch::setNSquaredProjection(true);
  59
  60     while (runTime.loop())
  61     {
  62         Info<< "Iteration: " << runTime.timeName() << nl << endl;
  63
  64 #       include "readStressedFoamControls.H"
  65
  66         volScalarField mu = rheology.mu();
  67         volScalarField lambda = rheology.lambda();
  68
  69         int iCorr=0;
  70         scalar initialResidual=0;
  71
  72         contact.correct();
  73
  74         do
  75         {
  76             fvVectorMatrix UEqn
  77             (
  78                 fvm::d2dt2(rho, U)
  79               ==
  80                 fvm::laplacian(2*mu + lambda, U, "laplacian(DU,U)")
  81
  82               + fvc::div
  83                 (
  84                     mu*gradU.T() + lambda*(I*tr(gradU)) - (mu + lambda)*gradU,
  85                     "div(sigma)"
  86                 )
  87             );
  88
  89 #           include "setComponentReference.H"
  90
  91             initialResidual = UEqn.solve().initialResidual();
  92
  93             gradU = fvc::grad(U);
  94
  95 #           include "calculateSigma.H"
  96
  97             rheology.correct();
  98
  99             rho = rheology.rho();
 100             mu = rheology.mu();
 101             lambda = rheology.lambda();
 102
 103         } while (initialResidual > convergenceTolerance && ++iCorr < nCorr);
 104
 105 #       include "calculateStress.H"
 106 #       include "calculateContactArea.H"
 107
 108         Info<< "ExecutionTime = "
 109             << runTime.elapsedCpuTime()
 110             << " s\n\n" << endl;
 111     }
 112
 113     Info<< "End\n" << endl;
 114
 115     return(0);
 116 }
 117
 118
 119 // ************************************************************************* //