1 /*---------------------------------------------------------------------------*\
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 -------------------------------------------------------------------------------
9 This file is part of foam-extend.
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.
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.
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/>.
25 solidEquilibriumDisplacementFoam
28 Steady-state segregated finite-volume solver of linear-elastic,
29 small-strain deformation of a solid body, with optional thermal
30 diffusion and thermal stresses.
32 Simple linear elasticity structural analysis code.
33 Solves for the displacement vector field D, also generating the
34 stress tensor field sigma.
36 \*---------------------------------------------------------------------------*/
41 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
43 int main(int argc, char *argv[])
46 # include "setRootCase.H"
48 # include "createTime.H"
49 # include "createMesh.H"
50 # include "readMechanicalProperties.H"
51 # include "createFields.H"
53 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
55 Info<< "\nCalculating displacement field\n" << endl;
57 while (runTime.loop())
59 Info<< "Iteration: " << runTime.value() << nl << endl;
61 # include "readSteadyStressFoamControls.H"
65 fvm::laplacian(2*mu + lambda, Dcorr, "laplacian(DD,Dcorr)")
66 + fvc::div(sigmaExp + sigmaD)
72 volTensorField gradDcorr = fvc::grad(Dcorr);
75 (lambda - mu)*gradDcorr + mu*gradDcorr.T()
76 + (lambda*I)*tr(gradDcorr);
78 sigmaD += accFac*(mu*twoSymm(gradDcorr) + (lambda*I)*tr(gradDcorr));
81 # include "calculateStress.H"
82 # include "kineticEnergyLimiter.H"
84 Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
85 << " ClockTime = " << runTime.elapsedClockTime() << " s"
95 // ************************************************************************* //