fixed writing out entries in advective bc
[OpenFOAM-1.6-ext.git] / tutorials / incompressible / icoDyMFoam / movingConeMotion / setMotionMovingCone / setMotionMovingCone.C
blob213c94f0449f9478702ae8bfd33399f50982ee89
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright held by original author
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     setMotionMovingCone
28 Description
29     Set the diffusivity field for mesh motion
31 \*---------------------------------------------------------------------------*/
33 #include "argList.H"
34 #include "tetPolyMesh.H"
35 #include "tetFemMatrix.H"
36 #include "elementFields.H"
38 using namespace Foam;
40 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
42 int main(int argc, char *argv[])
45 #   include "setRootCase.H"
47 #   include "createTime.H"
48 #   include "createPolyMesh.H"
49 #   include "createFields.H"
51 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
53     scalarField centresX =
54         mesh.cellCentres().component(vector::X);
56     motionGamma.internalField() +=
57         999*pos(centresX + 7e-3)*neg(centresX + 3.5e-3);
59     motionGamma.write();
61     Info<< "End\n" << endl;
63     return(0);
67 // ************************************************************************* //