Compare commits

...
Sign in to create a new pull request.

1 commit

Author SHA1 Message Date
ignis
d7cdb18820 substitute cell loop to field operations 2017-05-16 14:10:45 +09:00
2 changed files with 17 additions and 14 deletions

View file

@ -585,4 +585,6 @@ forAll (csSpecies, isp)
Info<< csSpeciesW << endl;
scalarField sigma_m (Te);
scalarField sigma_m (Te.internalField().size(), 0.0);
scalarField Xsum (Te.internalField().size(), 0.0);
scalarField meanEps (Te.internalField().size(), 0.0);

27
neEqn.H
View file

@ -6,24 +6,25 @@
Te = T;
Te.correctBoundaryConditions();
scalarField X (csSpecies.size(), 0.0);
scalarField &W (csSpeciesW);
forAll (Te, cid)
{
scalar eEps = (3./2.) * kB.value() * Te[cid]
/ eCharge.value();
Xsum = 0.0;
sigma_m = 0.0;
meanEps = (3./2.) * kB.value() / eCharge.value() * Te.internalField();
sigma_m[cid] = 0;
forAll (csSpecies, isp)
{
X[isp] = Y[csSpeciesI[isp]][cid]/W[isp];
sigma_m[cid] +=
X[isp] * csList[isp].value(eEps);
}
sigma_m[cid] /= sum(X);
forAll (csSpecies, isp)
{
label k = csSpeciesI[isp];
scalarField X (Y[k].internalField() / W[isp]);
Xsum += X;
sigma_m += X * csList[isp].value(meanEps);
}
sigma_m /= Xsum;
Info << min(sigma_m) << " / " << max(sigma_m) << endl;
/*