FreeFOAM The Cross-Platform CFD Toolkit
dnsFoam.C
Go to the documentation of this file.
1 /*---------------------------------------------------------------------------*\
2  ========= |
3  \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4  \\ / O peration |
5  \\ / A nd | Copyright (C) 1991-2010 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
13  the Free Software Foundation, either version 3 of the License, or
14  (at your 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, see <http://www.gnu.org/licenses/>.
23 
24 Application
25  dnsFoam
26 
27 Description
28  Direct numerical simulation solver for boxes of isotropic turbulence
29 
30 Usage
31  - dnsFoam [OPTION]
32 
33  @param -case <dir> \n
34  Specify the case directory
35 
36  @param -parallel \n
37  Run the case in parallel
38 
39  @param -help \n
40  Display short usage message
41 
42  @param -doc \n
43  Display Doxygen documentation page
44 
45  @param -srcDoc \n
46  Display source code
47 
48 \*---------------------------------------------------------------------------*/
49 
50 #include <finiteVolume/fvCFD.H>
51 #include <randomProcesses/Kmesh.H>
53 #include <randomProcesses/fft.H>
54 #include <randomProcesses/calcEk.H>
55 #include <OpenFOAM/graph.H>
56 
57 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
58 
59 int main(int argc, char *argv[])
60 {
61  #include <OpenFOAM/setRootCase.H>
62 
63  #include <OpenFOAM/createTime.H>
65  #include "readTransportProperties.H"
66  #include "createFields.H"
69 
70  // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
71 
72  Info<< nl << "Starting time loop" << endl;
73 
74  while (runTime.loop())
75  {
76  Info<< "Time = " << runTime.timeName() << nl << endl;
77 
79 
80  force.internalField() = ReImSum
81  (
82  fft::reverseTransform
83  (
84  K/(mag(K) + 1.0e-6) ^ forceGen.newField(), K.nn()
85  )
86  );
87 
88  #include "globalProperties.H"
89 
91  (
92  fvm::ddt(U)
93  + fvm::div(phi, U)
94  - fvm::laplacian(nu, U)
95  ==
96  force
97  );
98 
99  solve(UEqn == -fvc::grad(p));
100 
101 
102  // --- PISO loop
103 
104  for (int corr=1; corr<=1; corr++)
105  {
106  volScalarField rUA = 1.0/UEqn.A();
107 
108  U = rUA*UEqn.H();
109  phi = (fvc::interpolate(U) & mesh.Sf())
110  + fvc::ddtPhiCorr(rUA, U, phi);
111 
112  fvScalarMatrix pEqn
113  (
114  fvm::laplacian(rUA, p) == fvc::div(phi)
115  );
116 
117  pEqn.solve();
118 
119  phi -= pEqn.flux();
120 
122 
123  U -= rUA*fvc::grad(p);
124  U.correctBoundaryConditions();
125  }
126 
127  runTime.write();
128 
129  if (runTime.outputTime())
130  {
131  calcEk(U, K).write(runTime.timePath()/"Ek", runTime.graphFormat());
132  }
133 
134  Info<< "ExecutionTime = " << runTime.elapsedCpuTime() << " s"
135  << " ClockTime = " << runTime.elapsedClockTime() << " s"
136  << nl << endl;
137  }
138 
139  Info<< "End\n" << endl;
140 
141  return 0;
142 }
143 
144 
145 // ************************ vim: set sw=4 sts=4 et: ************************ //