[1D] Fixed calculation of diffusion flux due to Soret effect
Resolves Issue 132.
This commit is contained in:
parent
c4e62b72ed
commit
5b423847f2
1 changed files with 2 additions and 1 deletions
|
|
@ -979,7 +979,8 @@ void StFlow::updateDiffFluxes(const doublereal* x, size_t j0, size_t j1)
|
|||
|
||||
if (m_do_soret) {
|
||||
for (m = j0; m < j1; m++) {
|
||||
gradlogT = 2.0*(T(x,m+1) - T(x,m))/(T(x,m+1) + T(x,m));
|
||||
gradlogT = 2.0 * (T(x,m+1) - T(x,m)) /
|
||||
((T(x,m+1) + T(x,m)) * (z(m+1) - z(m)));
|
||||
for (k = 0; k < m_nsp; k++) {
|
||||
m_flux(k,m) -= m_dthermal(k,m)*gradlogT;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue