BUG: PointEdgeWave : n cyclics bool instead of label
[OpenFOAM-1.6.x.git] / applications / utilities / mesh / manipulation / deformedGeom / deformedGeom.C
blobf438a1f9637537c09dffbed428cc84d341494fbd
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 1991-2009 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 the
13     Free Software Foundation; either version 2 of the License, or (at your
14     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, write to the Free Software Foundation,
23     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
25 Application
26     deformedGeom
28 Description
29     Deforms a polyMesh using a displacement field U and a scaling factor
30     supplied as an argument.
32 \*---------------------------------------------------------------------------*/
34 #include "argList.H"
35 #include "fvMesh.H"
36 #include "pointFields.H"
37 #include "IStringStream.H"
38 #include "volPointInterpolation.H"
40 using namespace Foam;
42 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
44 int main(int argc, char *argv[])
46     argList::validArgs.append("scaling factor");
48 #   include "setRootCase.H"
50     scalar scaleFactor(readScalar(IStringStream(args.additionalArgs()[0])()));
52 #   include "createTime.H"
53 #   include "createMesh.H"
55     volPointInterpolation pInterp(mesh);
57     // Get times list
58     instantList Times = runTime.times();
60     pointField zeroPoints(mesh.points());
62     // skip "constant" time
63     for (label timeI = 1; timeI < Times.size(); ++timeI)
64     {
65         runTime.setTime(Times[timeI], timeI);
67         Info<< "Time = " << runTime.timeName() << endl;
69         IOobject Uheader
70         (
71             "U",
72             runTime.timeName(),
73             mesh,
74             IOobject::MUST_READ
75         );
77         // Check U exists
78         if (Uheader.headerOk())
79         {
80             Info<< "    Reading U" << endl;
81             volVectorField U(Uheader, mesh);
83             pointField newPoints =
84                 zeroPoints
85               + scaleFactor*pInterp.interpolate(U)().internalField();
87             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 // ************************************************************************* //