Commit 6d8b6516 authored by Andrew Heather's avatar Andrew Heather
Browse files

BUG: Corrected Curle analogy implementation. See #574

parent 5cfd3439
......@@ -99,7 +99,7 @@ bool Foam::functionObjects::Curle::calc()
volScalarField& pDash = tpDash.ref();
const volVectorField d(scopedName("d"), C - x0_);
pDash = 4*mathematical::pi/c0_*(d/magSqr(d) & dfdt);
pDash = (d/magSqr(d) & dfdt)/(4.0*mathematical::pi*c0_);
return store(resultName_, tpDash);
}
......
......@@ -33,7 +33,7 @@ Description
Curle's analogy is implemented as:
\f[
p' = 4 \frac{\pi}{c_0}\frac{\vec d}{|\vec d|^2}\frac{d(F)}{d(t)}
p' = \frac{1}{4 \pi c_0}\frac{\vec d}{|\vec d|^2}\frac{d(F)}{d(t)}
\f]
......@@ -68,8 +68,8 @@ Usage
type | Type name: Curle | yes |
field | Pressure field name | no | p
result | Acoustic pressure field name | no | Curle
patches | Sound generation patch names | yes |
c0 | Reference speed of sound | yes |
patches | Sound generation patch names | yes |
c0 | Reference speed of sound | yes |
\endtable
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment