Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Development
openfoam
Commits
9879aacb
Commit
9879aacb
authored
May 27, 2008
by
henry
Browse files
Removed ddtPhiCorr as the standard approach does not work with
moving meshes
parent
975c2d3c
Changes
3
Hide whitespace changes
Inline
Side-by-side
applications/solvers/incompressible/icoDyMFoam/icoDyMFoam.C
View file @
9879aacb
...
...
@@ -57,15 +57,15 @@ int main(int argc, char *argv[])
# include "readControls.H"
# include "CourantNo.H"
// Make the fluxes absolute
fvc
::
makeAbsolute
(
phi
,
U
);
# include "setDeltaT.H"
runTime
++
;
Info
<<
"Time = "
<<
runTime
.
timeName
()
<<
nl
<<
endl
;
// Make the fluxes absolute
fvc
::
makeAbsolute
(
phi
,
U
);
mesh
.
update
();
if
(
mesh
.
changing
()
&&
correctPhi
)
...
...
@@ -96,11 +96,6 @@ int main(int argc, char *argv[])
U
=
rAU
*
UEqn
.
H
();
phi
=
(
fvc
::
interpolate
(
U
)
&
mesh
.
Sf
());
if
(
ddtPhiCorr
)
{
phi
+=
fvc
::
ddtPhiCorr
(
rAU
,
U
,
phi
);
}
if
(
p
.
needReference
())
{
fvc
::
makeRelative
(
phi
,
U
);
...
...
applications/solvers/multiphase/interDyMFoam/interDyMFoam.C
View file @
9879aacb
...
...
@@ -67,15 +67,16 @@ int main(int argc, char *argv[])
{
#include
"readControls.H"
#include
"CourantNo.H"
// Make the fluxes absolute
fvc
::
makeAbsolute
(
phi
,
U
);
#include
"setDeltaT.H"
runTime
++
;
Info
<<
"Time = "
<<
runTime
.
timeName
()
<<
nl
<<
endl
;
// Make the fluxes absolute
fvc
::
makeAbsolute
(
phi
,
U
);
scalar
timeBeforeMeshUpdate
=
runTime
.
elapsedCpuTime
();
// Do any mesh changes
...
...
@@ -96,9 +97,6 @@ int main(int argc, char *argv[])
#include
"correctPhi.H"
}
// Keep the absolute fluxes for use in ddtPhiCorr
surfaceScalarField
phiAbs0
(
"phiAbs0"
,
phi
);
// Make the fluxes relative to the mesh motion
fvc
::
makeRelative
(
phi
,
U
);
...
...
applications/solvers/multiphase/interDyMFoam/pEqn.H
View file @
9879aacb
...
...
@@ -5,11 +5,6 @@
U
=
rAU
*
UEqn
.
H
();
surfaceScalarField
phiU
(
"phiU"
,
(
fvc
::
interpolate
(
U
)
&
mesh
.
Sf
()));
if
(
ddtPhiCorr
)
{
phiU
+=
fvc
::
ddtPhiCorr
(
rAU
,
rho
,
U
,
phiAbs0
);
}
phi
=
phiU
+
(
fvc
::
interpolate
(
interface
.
sigmaK
())
*
fvc
::
snGrad
(
gamma
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment