Initial commit for version 2.0.x patch release
[OpenFOAM-2.0.x.git] / applications / utilities / mesh / manipulation / deformedGeom / deformedGeom.C
blob02e79166a87547ebf1df58da7d139b21959f287f
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 2004-2010 OpenCFD Ltd.
6      \\/     M anipulation  |
7 -------------------------------------------------------------------------------
8 License
9     This file is part of OpenFOAM.
11     OpenFOAM is free software: you can redistribute it and/or modify it
12     under the terms of the GNU General Public License as published by
13     the Free Software Foundation, either version 3 of the License, or
14     (at your option) any later version.
16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
19     for more details.
21     You should have received a copy of the GNU General Public License
22     along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
24 Application
25     deformedGeom
27 Description
28     Deforms a polyMesh using a displacement field U and a scaling factor
29     supplied as an argument.
31 \*---------------------------------------------------------------------------*/
33 #include "argList.H"
34 #include "fvMesh.H"
35 #include "pointFields.H"
36 #include "IStringStream.H"
37 #include "volPointInterpolation.H"
39 using namespace Foam;
41 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
43 int main(int argc, char *argv[])
45     argList::validArgs.append("scaling factor");
47 #   include "setRootCase.H"
49     const scalar scaleFactor = args.argRead<scalar>(1);
51 #   include "createTime.H"
52 #   include "createMesh.H"
54     volPointInterpolation pInterp(mesh);
56     // Get times list
57     instantList Times = runTime.times();
59     pointField zeroPoints(mesh.points());
61     // skip "constant" time
62     for (label timeI = 1; timeI < Times.size(); ++timeI)
63     {
64         runTime.setTime(Times[timeI], timeI);
66         Info<< "Time = " << runTime.timeName() << endl;
68         IOobject Uheader
69         (
70             "U",
71             runTime.timeName(),
72             mesh,
73             IOobject::MUST_READ
74         );
76         // Check U exists
77         if (Uheader.headerOk())
78         {
79             Info<< "    Reading U" << endl;
80             volVectorField U(Uheader, mesh);
82             pointField newPoints
83             (
84                 zeroPoints
85               + scaleFactor*pInterp.interpolate(U)().internalField()
86             );
88             mesh.polyMesh::movePoints(newPoints);
89             mesh.write();
90         }
91         else
92         {
93             Info<< "    No U" << endl;
94         }
96         Info<< endl;
97     }
99     Info<< "End\n" << endl;
101     return 0;
105 // ************************************************************************* //