applications/solvers/incompressible/icoDyMFoam/icoDyMFoam.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
   4    \\    /   O peration     |
   5     \\  /    A nd           | Copyright (C) 1991-2008 OpenCFD Ltd.
   6      \\/     M anipulation  |
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of OpenFOAM.
  10
  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.
  15
  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.
  20
  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
  24
  25 Application
  26     icoDyMFoam
  27
  28 Description
  29     Transient solver for incompressible, laminar flow of Newtonian fluids
  30     with moving mesh.
  31
  32 \*---------------------------------------------------------------------------*/
  33
  34 #include "fvCFD.H"
  35 #include "dynamicFvMesh.H"
  36
  37 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  38
  39 int main(int argc, char *argv[])
  40 {
  41
  42 #   include "setRootCase.H"
  43
  44 #   include "createTime.H"
  45 #   include "createDynamicFvMesh.H"
  46 #   include "readPISOControls.H"
  47 #   include "initContinuityErrs.H"
  48 #   include "createFields.H"
  49 #   include "readTimeControls.H"
  50
  51 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  52
  53     Info<< "\nStarting time loop\n" << endl;
  54
  55     while (runTime.run())
  56     {
  57 #       include "readControls.H"
  58 #       include "CourantNo.H"
  59
  60         // Make the fluxes absolute
  61         fvc::makeAbsolute(phi, U);
  62
  63 #       include "setDeltaT.H"
  64
  65         runTime++;
  66
  67         Info<< "Time = " << runTime.timeName() << nl << endl;
  68
  69         mesh.update();
  70
  71         if (mesh.changing() && correctPhi)
  72         {
  73 #           include "correctPhi.H"
  74         }
  75
  76         // Make the fluxes relative to the mesh motion
  77         fvc::makeRelative(phi, U);
  78
  79         if (mesh.changing() && checkMeshCourantNo)
  80         {
  81 #           include "meshCourantNo.H"
  82         }
  83
  84         // --- PIMPLE loop
  85         for (int ocorr=0; ocorr<nOuterCorr; ocorr++)
  86         {
  87             p.storePrevIter();
  88
  89 #           include "UEqn.H"
  90
  91             // --- PISO loop
  92             for (int corr=0; corr<nCorr; corr++)
  93             {
  94                 rAU = 1.0/UEqn.A();
  95
  96                 U = rAU*UEqn.H();
  97                 phi = (fvc::interpolate(U) & mesh.Sf());
  98
  99                 if (p.needReference())
 100                 {
 101                     fvc::makeRelative(phi, U);
 102                     adjustPhi(phi, U, p);
 103                     fvc::makeAbsolute(phi, U);
 104                 }
 105
 106                 for (int nonOrth=0; nonOrth<=nNonOrthCorr; nonOrth++)
 107                 {
 108                     fvScalarMatrix pEqn
 109                     (
 110                         fvm::laplacian(rAU, p) == fvc::div(phi)
 111                     );
 112
 113                     pEqn.setReference(pRefCell, pRefValue);
 114
 115                     if (corr == nCorr-1 && nonOrth == nNonOrthCorr)
 116                     {
 117                         pEqn.solve(mesh.solver(p.name() + "Final"));
 118                     }
 119                     else
 120                     {
 121                         pEqn.solve(mesh.solver(p.name()));
 122                     }
 123
 124                     if (nonOrth == nNonOrthCorr)
 125                     {
 126                         phi -= pEqn.flux();
 127                     }
 128                 }
 129
 130 #               include "continuityErrs.H"
 131
 132                 // Explicitly relax pressure for momentum corrector
 133                 if (ocorr != nOuterCorr-1)
 134                 {
 135                     p.relax();
 136                 }
 137
 138                 // Make the fluxes relative to the mesh motion
 139                 fvc::makeRelative(phi, U);
 140
 141                 U -= rAU*fvc::grad(p);
 142                 U.correctBoundaryConditions();
 143             }
 144         }
 145
 146         runTime.write();
 147
 148         Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
 149             << "  ClockTime = " << runTime.elapsedClockTime() << " s"
 150             << nl << endl;
 151     }
 152
 153     Info<< "End\n" << endl;
 154
 155     return(0);
 156 }
 157
 158
 159 // ************************************************************************* //