applications/solvers/surfaceTracking/interTrackFoam/interTrackFoam.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   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 -------------------------------------------------------------------------------
   8 License
   9     This file is part of foam-extend.
  10
  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.
  15
  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.
  20
  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/>.
  23
  24 Application
  25     interfaceTrackinFoam
  26
  27 Description
  28     Incompressible laminar CFD code for simulation of a single bubble rising
  29     in a stil liquid. Interface between fluid phases is tracked using moving
  30     mesh.
  31
  32 \*---------------------------------------------------------------------------*/
  33
  34 #include "fvCFD.H"
  35 #include "dynamicFvMesh.H"
  36 #include "freeSurface.H"
  37
  38
  39 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  40
  41 int main(int argc, char *argv[])
  42 {
  43 #   include "setRootCase.H"
  44
  45 #   include "createTime.H"
  46
  47 #   include "createDynamicFvMesh.H"
  48
  49 #   include "createFields.H"
  50
  51 #   include "initContinuityErrs.H"
  52
  53 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
  54
  55     Info << "\nStarting time loop\n" << endl;
  56
  57     for (runTime++; !runTime.end(); runTime++)
  58     {
  59         Info << "Time = " << runTime.value() << endl << endl;
  60
  61 #       include "readPISOControls.H"
  62
  63         interface.moveMeshPointsForOldFreeSurfDisplacement();
  64
  65         interface.updateDisplacementDirections();
  66
  67         interface.predictPoints();
  68
  69         Info<< "\nMax surface Courant Number = "
  70             << interface.maxCourantNumber() << endl << endl;
  71
  72         for (int corr=0; corr<nOuterCorr; corr++)
  73         {
  74             // Update interface bc
  75             interface.updateBoundaryConditions();
  76
  77             // Make the fluxes relative
  78             phi -= fvc::meshPhi(rho, U);
  79
  80 #           include "CourantNo.H"
  81
  82             fvVectorMatrix UEqn
  83             (
  84                 fvm::ddt(rho, U)
  85               + fvm::div(fvc::interpolate(rho)*phi, U, "div(phi,U)")
  86               - fvm::laplacian(mu, U)
  87             );
  88
  89             solve(UEqn == -fvc::grad(p));
  90
  91             // --- PISO loop
  92             for (int i=0; i<nCorr; i++)
  93             {
  94                 volScalarField AU = UEqn.A();
  95
  96                 U = UEqn.H()/AU;
  97
  98                 phi = (fvc::interpolate(U) & mesh.Sf());
  99
 100 #               include "scalePhi.H"
 101
 102                 // Non-orthogonal pressure corrector loop
 103                 for (label nonOrth=0; nonOrth<=nNonOrthCorr; nonOrth++)
 104                 {
 105                     fvScalarMatrix pEqn
 106                     (
 107                         fvm::laplacian(1.0/AU, p)
 108                      == fvc::div(phi)
 109                     );
 110
 111 #                   include "setReference.H"
 112
 113                     pEqn.solve();
 114
 115                     if (nonOrth == nNonOrthCorr)
 116                     {
 117                         phi -= pEqn.flux();
 118                     }
 119                 }
 120
 121 #               include "continuityErrs.H"
 122
 123                 // Momentum corrector
 124                 U -= fvc::grad(p)/AU;
 125                 U.correctBoundaryConditions();
 126             }
 127
 128             interface.correctPoints();
 129
 130 #           include "freeSurfaceContinuityErrs.H"
 131         }
 132
 133 #       include "volContinuity.H"
 134
 135         Info << "Total surface tension force: "
 136             << interface.totalSurfaceTensionForce() << endl;
 137
 138         vector totalForce =
 139             interface.totalViscousForce()
 140           + interface.totalPressureForce();
 141
 142         Info << "Total force: " << totalForce << endl;
 143
 144         runTime.write();
 145
 146         Info << "ExecutionTime = "
 147             << scalar(runTime.elapsedCpuTime())
 148             << " s\n" << endl << endl;
 149     }
 150
 151     Info << "End\n" << endl;
 152
 153     return(0);
 154 }
 155
 156 // ************************************************************************* //