Skip to content
Snippets Groups Projects
Commit 6f2ac4ca authored by Andrew Heather's avatar Andrew Heather Committed by Mark OLESEN
Browse files

BUG: Curle FO - corrected division by 4pi. Fixes #2035

parent 5f5903ce
No related branches found
No related tags found
No related merge requests found
...@@ -5,7 +5,7 @@ ...@@ -5,7 +5,7 @@
\\ / A nd | www.openfoam.com \\ / A nd | www.openfoam.com
\\/ M anipulation | \\/ M anipulation |
------------------------------------------------------------------------------- -------------------------------------------------------------------------------
Copyright (C) 2017-2020 OpenCFD Ltd. Copyright (C) 2017-2021 OpenCFD Ltd.
------------------------------------------------------------------------------- -------------------------------------------------------------------------------
License License
This file is part of OpenFOAM. This file is part of OpenFOAM.
...@@ -220,6 +220,9 @@ bool Foam::functionObjects::Curle::execute() ...@@ -220,6 +220,9 @@ bool Foam::functionObjects::Curle::execute()
sum((pp*sqr(invMagR) + invMagR/c0_*dpdtp)*(Sfp & r)); sum((pp*sqr(invMagR) + invMagR/c0_*dpdtp)*(Sfp & r));
} }
} }
pDash /= 4*mathematical::pi;
Pstream::listCombineGather(pDash, plusEqOp<scalar>()); Pstream::listCombineGather(pDash, plusEqOp<scalar>());
Pstream::listCombineScatter(pDash); Pstream::listCombineScatter(pDash);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment