protected override void CreateFields()
{
Phi = new LevelSet(new Basis(this.GridData, 2), "Phi");
LsTrk = new LevelSetTracker((BoSSS.Foundation.Grid.Classic.GridData) this.GridData, XQuadFactoryHelper.MomentFittingVariants.OneStepGaussAndStokes, 1, new string[] { "A", "B" }, Phi);
if (m_DGorder < 1)
{
throw new ArgumentException();
}
if (m_UseXdg == XDGusage.all)
{
u1 = new XDGField(new XDGBasis(this.LsTrk, m_DGorder), "u1");
u2 = new XDGField(new XDGBasis(this.LsTrk, m_DGorder - 1), "u2");
}
else if (m_UseXdg == XDGusage.none)
{
u1 = new SinglePhaseField(new Basis(this.GridData, m_DGorder), "u1");
u2 = new SinglePhaseField(new Basis(this.GridData, m_DGorder - 1), "u2");
}
else if (m_UseXdg == XDGusage.mixed1)
{
u1 = new XDGField(new XDGBasis(this.LsTrk, m_DGorder), "u1");
u2 = new SinglePhaseField(new Basis(this.GridData, m_DGorder - 1), "u2");
}
else if (m_UseXdg == XDGusage.mixed2)
{
u1 = new SinglePhaseField(new Basis(this.GridData, m_DGorder), "u1");
u2 = new XDGField(new XDGBasis(this.LsTrk, m_DGorder - 1), "u2");
}
else
{
throw new NotImplementedException();
}
Amarker = new SinglePhaseField(new Basis(this.GridData, 0), "Amarker");
Bmarker = new SinglePhaseField(new Basis(this.GridData, 0), "Bmarker");
MPIrank = new SinglePhaseField(new Basis(this.GridData, 0), "MPIRank");
MPIrank.AccConstant(this.MPIRank);
}
public void LimitFieldValues(IEnumerable <DGField> ConservativeVariables, IEnumerable <DGField> DerivedFields)
{
//IProgram<CNSControl> program;
//CNSFieldSet fieldSet = program.WorkingSet;
DGField Density = ConservativeVariables.Single(f => f.Identification == Variables.Density.Name);
DGField Momentum_0 = ConservativeVariables.Single(f => f.Identification == Variables.Momentum[0].Name);
DGField Momentum_1 = ConservativeVariables.Single(f => f.Identification == Variables.Momentum[1].Name);
DGField Energy = ConservativeVariables.Single(f => f.Identification == Variables.Energy.Name);
foreach (var chunkRulePair in quadRuleSet)
{
if (chunkRulePair.Chunk.Len > 1)
{
throw new System.Exception();
}
MultidimensionalArray densityValues = MultidimensionalArray.Create(chunkRulePair.Chunk.Len, chunkRulePair.Rule.NoOfNodes);
Density.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, densityValues);
MultidimensionalArray m0Values = MultidimensionalArray.Create(chunkRulePair.Chunk.Len, chunkRulePair.Rule.NoOfNodes);
Momentum_0.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, m0Values);
MultidimensionalArray m1Values = MultidimensionalArray.Create(chunkRulePair.Chunk.Len, chunkRulePair.Rule.NoOfNodes);
Momentum_1.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, m1Values);
MultidimensionalArray energyValues = MultidimensionalArray.Create(chunkRulePair.Chunk.Len, chunkRulePair.Rule.NoOfNodes);
Energy.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, energyValues);
for (int i = 0; i < chunkRulePair.Chunk.Len; i++)
{
int cell = i + chunkRulePair.Chunk.i0;
CellMask singleCellMask = new CellMask(speciesMap.Tracker.GridDat, chunkRulePair.Chunk);
CellQuadratureScheme singleCellScheme = new CellQuadratureScheme(
new FixedRuleFactory <QuadRule>(chunkRulePair.Rule), singleCellMask);
var singleCellRule = singleCellScheme.Compile(speciesMap.Tracker.GridDat, 99);
SpeciesId species = speciesMap.Tracker.GetSpeciesId(speciesMap.Control.FluidSpeciesName);
double volume = speciesMap.QuadSchemeHelper.NonAgglomeratedMetrics.CutCellVolumes[species][cell];
double integralDensity = Density.LxError((ScalarFunction)null, (X, a, b) => a, singleCellRule);
double meanDensity = integralDensity / volume;
if (meanDensity < epsilon)
{
throw new System.Exception();
}
double minDensity = double.MaxValue;
for (int j = 0; j < chunkRulePair.Rule.NoOfNodes; j++)
{
minDensity = Math.Min(minDensity, densityValues[i, j]);
}
double thetaDensity = Math.Min(1.0, (meanDensity - epsilon) / (meanDensity - minDensity));
if (thetaDensity < 1.0)
{
Console.WriteLine("Scaled density in cell {0}!", cell);
}
// Scale for positive density (Beware: Basis is not orthonormal on sub-volume!)
for (int j = 0; j < Density.Basis.Length; j++)
{
Density.Coordinates[cell, j] *= thetaDensity;
}
Density.AccConstant(meanDensity * (1.0 - thetaDensity), singleCellMask);
// Re-evaluate since inner energy has changed
densityValues.Clear();
Density.Evaluate(cell, 1, chunkRulePair.Rule.Nodes, densityValues);
#if DEBUG
// Probe 1
for (int j = 0; j < chunkRulePair.Rule.NoOfNodes; j++)
{
if (densityValues[i, j] - epsilon < -1e-15)
{
throw new System.Exception();
}
}
#endif
double integralMomentumX = Momentum_0.LxError((ScalarFunction)null, (X, a, b) => a, singleCellRule);
double meanMomentumX = integralMomentumX / volume;
double integralMomentumY = Momentum_1.LxError((ScalarFunction)null, (X, a, b) => a, singleCellRule);
double meanMomentumY = integralMomentumY / volume;
double integralEnergy = Energy.LxError((ScalarFunction)null, (X, a, b) => a, singleCellRule);
double meanEnergy = integralEnergy / volume;
double meanInnerEnergy = meanEnergy - 0.5 * (meanMomentumX * meanMomentumX + meanMomentumY * meanMomentumY) / meanDensity;
if (meanInnerEnergy < epsilon)
{
throw new System.Exception();
}
double minInnerEnergy = double.MaxValue;
for (int j = 0; j < chunkRulePair.Rule.NoOfNodes; j++)
{
double innerEnergy = energyValues[i, j] - 0.5 * (m0Values[i, j] * m0Values[i, j] + m1Values[i, j] * m1Values[i, j]) / densityValues[i, j];
minInnerEnergy = Math.Min(minInnerEnergy, innerEnergy);
}
// Scale for positive inner energy (Beware: Basis is not orthonormal on sub-volume!)
double thetaInnerEnergy = Math.Min(1.0, (meanInnerEnergy - epsilon) / (meanInnerEnergy - minInnerEnergy));
if (thetaInnerEnergy < 1.0)
{
Console.WriteLine("Scaled inner energy in cell {0}!", cell);
}
for (int j = 0; j < Density.Basis.Length; j++)
{
Density.Coordinates[chunkRulePair.Chunk.i0 + i, j] *= thetaInnerEnergy;
Momentum_0.Coordinates[chunkRulePair.Chunk.i0 + i, j] *= thetaInnerEnergy;
Momentum_1.Coordinates[chunkRulePair.Chunk.i0 + i, j] *= thetaInnerEnergy;
Energy.Coordinates[chunkRulePair.Chunk.i0 + i, j] *= thetaInnerEnergy;
}
Density.AccConstant(meanDensity * (1.0 - thetaInnerEnergy), singleCellMask);
Momentum_0.AccConstant(meanMomentumX * (1.0 - thetaInnerEnergy), singleCellMask);
Momentum_1.AccConstant(meanMomentumY * (1.0 - thetaInnerEnergy), singleCellMask);
Energy.AccConstant(meanEnergy * (1.0 - thetaInnerEnergy), singleCellMask);
#if DEBUG
// Probe 2
densityValues.Clear();
Density.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, densityValues);
m0Values.Clear();
Momentum_0.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, m0Values);
m1Values.Clear();
Momentum_1.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, m1Values);
energyValues.Clear();
Energy.Evaluate(chunkRulePair.Chunk.i0, chunkRulePair.Chunk.Len, chunkRulePair.Rule.Nodes, energyValues);
for (int j = 0; j < chunkRulePair.Rule.NoOfNodes; j++)
{
StateVector state = new StateVector(
speciesMap.GetMaterial(1.0),
densityValues[i, j],
new Vector(m0Values[i, j], m1Values[i, j], 0.0),
energyValues[i, j]);
if (!state.IsValid)
{
throw new System.Exception();
}
}
#endif
}
}
}
