//****************************************
void cfdemCloud::calcMultiphaseTurbulence()
{
//Temporary field for collecting the sources
volScalarField tmpSource
( IOobject
(
"tmpSource",
mesh().time().timeName(),
mesh(),
IOobject::NO_READ,
IOobject::NO_WRITE
),
turbulenceMultiphase_*0.0
);
//reset sources, and compute the sources due to the cloud
//Will accumulate all sources for all force models
for (int iModel=0; iModel<nrForceModels(); iModel++) //
{
#ifdef compre
forceM(iModel).multiphaseTurbulence(tmpSource, true);
#else
forceM(iModel).multiphaseTurbulence(tmpSource, false);
#endif
if(iModel==0)
turbulenceMultiphase_ = tmpSource;
else
turbulenceMultiphase_ += tmpSource;
}
}
bool Foam::cfdemCloudIB::evolve()
{
numberOfParticlesChanged_ = false;
arraysReallocated_=false;
bool doCouple=false;
if (dataExchangeM().couple())
{
Info << "\n timeStepFraction() = " << dataExchangeM().timeStepFraction() << endl;
doCouple=true;
if(verbose_) Info << "- getDEMdata()" << endl;
getDEMdata();
Info << "nr particles = " << numberOfParticles() << endl;
// search cellID of particles
if(verbose_) Info << "- findCell()" << endl;
locateM().findCell(NULL,positions_,cellIDs_,numberOfParticles());
if(verbose_) Info << "findCell done." << endl;
// set void fraction field
if(verbose_) Info << "- setvoidFraction()" << endl;
voidFractionM().setvoidFraction(NULL,voidfractions_,particleWeights_,particleVolumes_);
if(verbose_) Info << "setvoidFraction done." << endl;
// set particles forces
if(verbose_) Info << "- setForce(forces_)" << endl;
for(int index = 0;index < numberOfParticles_; ++index){
for(int i=0;i<3;i++){
impForces_[index][i] = 0;
expForces_[index][i] = 0;
DEMForces_[index][i] = 0;
}
}
for (int i=0;i<nrForceModels();i++) forceM(i).setForce();
if(verbose_) Info << "setForce done." << endl;
// write DEM data
if(verbose_) Info << " -giveDEMdata()" << endl;
giveDEMdata();
}
Info << "evolve done." << endl;
//if(verbose_) #include "debugInfo.H";
// do particle IO
IOM().dumpDEMdata();
return doCouple;
}
// * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
Foam::cfdemCloud::cfdemCloud
(
const fvMesh& mesh
)
:
mesh_(mesh),
couplingProperties_
(
IOobject
(
"couplingProperties",
mesh_.time().constant(),
mesh_,
IOobject::MUST_READ,
IOobject::NO_WRITE
)
),
liggghtsCommandDict_
(
IOobject
(
"liggghtsCommands",
mesh_.time().constant(),
mesh_,
IOobject::MUST_READ,
IOobject::NO_WRITE
)
),
verbose_(false),
ignore_(false),
modelType_(couplingProperties_.lookup("modelType")),
positions_(NULL),
velocities_(NULL),
fluidVel_(NULL),
impForces_(NULL),
expForces_(NULL),
DEMForces_(NULL),
Cds_(NULL),
radii_(NULL),
voidfractions_(NULL),
cellIDs_(NULL),
particleWeights_(NULL),
particleVolumes_(NULL),
numberOfParticles_(0),
numberOfParticlesChanged_(false),
arraysReallocated_(false),
forceModels_(couplingProperties_.lookup("forceModels")),
momCoupleModels_(couplingProperties_.lookup("momCoupleModels")),
liggghtsCommandModelList_(liggghtsCommandDict_.lookup("liggghtsCommandModels")),
turbulenceModelType_(couplingProperties_.lookup("turbulenceModelType")),
cgOK_(true),
impDEMdrag_(false),
useDDTvoidfraction_(false),
ddtVoidfraction_
(
IOobject
(
"ddtVoidfraction",
mesh.time().timeName(),
mesh,
IOobject::NO_READ,
IOobject::AUTO_WRITE
),
mesh,
dimensionedScalar("zero", dimensionSet(0,0,-1,0,0), 0) // 1/s
),
turbulence_
(
#if defined(version21) || defined(version16ext)
#ifdef comp
mesh.lookupObject<compressible::turbulenceModel>
#else
mesh.lookupObject<incompressible::turbulenceModel>
#endif
#elif defined(version15)
mesh.lookupObject<incompressible::RASModel>
#endif
(
turbulenceModelType_
)
),
locateModel_
(
locateModel::New
(
couplingProperties_,
*this
)
),
/*momCoupleModel_
(
momCoupleModel::New
(
couplingProperties_,
*this
)
),*/
dataExchangeModel_
(
dataExchangeModel::New
(
couplingProperties_,
*this
)
),
IOModel_
(
IOModel::New
(
couplingProperties_,
*this
)
),
probeModel_
(
probeModel::New
(
couplingProperties_,
*this,
"none",
"none"
)
),
voidFractionModel_
(
voidFractionModel::New
(
couplingProperties_,
*this
)
),
averagingModel_
(
averagingModel::New
(
couplingProperties_,
*this
)
),
clockModel_
(
clockModel::New
(
couplingProperties_,
*this
)
),
smoothingModel_
(
smoothingModel::New
(
couplingProperties_,
*this
)
),
meshMotionModel_
(
meshMotionModel::New
(
couplingProperties_,
*this
)
)
{
#include "versionInfo.H"
Info << "If BC are important, please provide volScalarFields -imp/expParticleForces-" << endl;
if (couplingProperties_.found("verbose")) verbose_=true;
if (couplingProperties_.found("ignore")) ignore_=true;
if (turbulenceModelType_=="LESProperties")
Info << "WARNING - LES functionality not yet tested!" << endl;
if (couplingProperties_.found("useDDTvoidfraction"))
useDDTvoidfraction_=true;
else
Info << "ignoring ddt(voidfraction)" << endl;
forceModel_ = new autoPtr<forceModel>[nrForceModels()];
for (int i=0;i<nrForceModels();i++)
{
forceModel_[i] = forceModel::New
(
couplingProperties_,
*this,
forceModels_[i]
);
}
momCoupleModel_ = new autoPtr<momCoupleModel>[momCoupleModels_.size()];
for (int i=0;i<momCoupleModels_.size();i++)
{
momCoupleModel_[i] = momCoupleModel::New
(
couplingProperties_,
*this,
momCoupleModels_[i]
);
}
// run liggghts commands from cfdem
liggghtsCommand_ = new autoPtr<liggghtsCommandModel>[liggghtsCommandModelList_.size()];
for (int i=0;i<liggghtsCommandModelList_.size();i++)
{
liggghtsCommand_[i] = liggghtsCommandModel::New
(
liggghtsCommandDict_,
*this,
liggghtsCommandModelList_[i],
i
);
}
dataExchangeM().setCG();
if (!cgOK_ && forceM(0).cg() > 1) FatalError<< "at least one of your models is not fit for cg !!!"<< abort(FatalError);
}
// * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
Foam::cfdemCloud::cfdemCloud
(
const fvMesh& mesh
)
:
mesh_(mesh),
couplingProperties_
(
IOobject
(
"couplingProperties",
mesh_.time().constant(),
mesh_,
IOobject::MUST_READ,
IOobject::NO_WRITE
)
),
liggghtsCommandDict_
(
IOobject
(
"liggghtsCommands",
mesh_.time().constant(),
mesh_,
IOobject::MUST_READ,
IOobject::NO_WRITE
)
),
solveFlow_(true),
solveScalarTransport_(true),
verbose_(false),
debug_(false),
allowCFDsubTimestep_(true),
ignore_(false),
modelType_(couplingProperties_.lookup("modelType")),
positions_(NULL),
velocities_(NULL),
fluidVel_(NULL),
fAcc_(NULL),
impForces_(NULL),
expForces_(NULL),
DEMForces_(NULL),
Cds_(NULL),
radii_(NULL),
voidfractions_(NULL),
cellIDs_(NULL),
particleWeights_(NULL),
particleVolumes_(NULL),
particleV_(NULL),
dragPrev_(NULL),
numberOfParticles_(0),
d32_(-1),
numberOfParticlesChanged_(false),
arraysReallocated_(false),
forceModels_(couplingProperties_.lookup("forceModels")),
momCoupleModels_(couplingProperties_.lookup("momCoupleModels")),
liggghtsCommandModelList_(liggghtsCommandDict_.lookup("liggghtsCommandModels")),
turbulenceModelType_(couplingProperties_.lookup("turbulenceModelType")),
isLES_(false),
cg_(1.),
cgOK_(true),
impDEMdrag_(false),
impDEMdragAcc_(false),
imExSplitFactor_(1.0),
treatVoidCellsAsExplicitForce_(false),
useDDTvoidfraction_("off"),
ddtVoidfraction_
(
IOobject
(
"ddtVoidfraction",
mesh.time().timeName(),
mesh,
IOobject::NO_READ,
IOobject::AUTO_WRITE
),
mesh,
dimensionedScalar("zero", dimensionSet(0,0,-1,0,0), 0) // 1/s
),
checkPeriodicCells_(false),
turbulence_
(
#if defined(version24Dev)
mesh.lookupObject<turbulenceModel>
#elif defined(version21) || defined(version16ext)
#ifdef compre
mesh.lookupObject<compressible::turbulenceModel>
#else
mesh.lookupObject<incompressible::turbulenceModel>
#endif
#elif defined(version15)
mesh.lookupObject<incompressible::RASModel>
#endif
(
turbulenceModelType_
)
),
turbulenceMultiphase_
(
IOobject
(
"turbulenceMultiphase",
mesh.time().timeName(),
mesh,
IOobject::NO_READ,
IOobject::AUTO_WRITE
),
mesh,
#ifdef compre
dimensionedScalar("zero", dimensionSet(1,-1,-1,0,0), 0) // kg/m/s
#else
dimensionedScalar("zero", dimensionSet(0,2,-1,0,0), 0) // m²/s
#endif
),
locateModel_
(
locateModel::New
(
couplingProperties_,
*this
)
),
/*momCoupleModel_
(
momCoupleModel::New
(
couplingProperties_,
*this
)
),*/
dataExchangeModel_
(
dataExchangeModel::New
(
couplingProperties_,
*this
)
),
IOModel_
(
IOModel::New
(
couplingProperties_,
*this
)
),
probeModel_
(
probeModel::New
(
couplingProperties_,
*this,
(char *)"none",
(char *)"none"
)
),
voidFractionModel_
(
voidFractionModel::New
(
couplingProperties_,
*this
)
),
averagingModel_
(
averagingModel::New
(
couplingProperties_,
*this
)
),
clockModel_
(
clockModel::New
(
couplingProperties_,
*this
)
),
smoothingModel_
(
smoothingModel::New
(
couplingProperties_,
*this
)
),
meshMotionModel_
(
meshMotionModel::New
(
couplingProperties_,
*this
)
)
{
#include "versionInfo.H"
global buildInfo(couplingProperties_,*this);
buildInfo.info();
//-- apply debug Mode to sub models
// set debug flag according to env
debug_ = buildInfo.debugMode();
// overwrite debug flag if found in dict
if (couplingProperties_.found("debug"))
debug_=Switch(couplingProperties_.lookup("debug"));
// apply flag
if(!debugMode()) ddtVoidfraction_.writeOpt() = IOobject::NO_WRITE;
if(!debugMode()) turbulenceMultiphase_.writeOpt() = IOobject::NO_WRITE;
voidFractionM().applyDebugSettings(debugMode());
averagingM().applyDebugSettings(debugMode());
//--
dataExchangeM().setCG();
Info << "If BC are important, please provide volScalarFields -imp/expParticleForces-" << endl;
if (couplingProperties_.found("solveFlow"))
solveFlow_=Switch(couplingProperties_.lookup("solveFlow"));
if (couplingProperties_.found("solveScalarTransport"))
solveScalarTransport_=Switch(couplingProperties_.lookup("solveScalarTransport"));
if (couplingProperties_.found("imExSplitFactor"))
imExSplitFactor_ = readScalar(couplingProperties_.lookup("imExSplitFactor"));
if(imExSplitFactor_>1.0)
FatalError << "You have set imExSplitFactor > 1 in your couplingProperties. Must be <=1."
<< abort(FatalError);
if(imExSplitFactor_<0.0)
FatalError << "You have set imExSplitFactor < 0 in your couplingProperties. Must be >=0"
<< abort(FatalError);
if (couplingProperties_.found("treatVoidCellsAsExplicitForce"))
treatVoidCellsAsExplicitForce_ = readBool(couplingProperties_.lookup("treatVoidCellsAsExplicitForce"));
if (couplingProperties_.found("verbose")) verbose_=true;
if (couplingProperties_.found("ignore")) ignore_=true;
if (turbulenceModelType_=="LESProperties")
{
isLES_ = true;
Info << "WARNING - LES functionality not yet tested!" << endl;
}
if (couplingProperties_.found("useDDTvoidfraction"))
{
useDDTvoidfraction_=word(couplingProperties_.lookup("useDDTvoidfraction"));
if(useDDTvoidfraction_==word("a") ||
useDDTvoidfraction_==word("b") ||
useDDTvoidfraction_==word("off")
)
Info << "choice for ddt(voidfraction) = " << useDDTvoidfraction_ << endl;
else
FatalError << "Model " << useDDTvoidfraction_
<< " is not a valid choice for ddt(voidfraction). Choose a or b or off."
<< abort(FatalError);
}
else
Info << "ignoring ddt(voidfraction)" << endl;
forceModel_ = new autoPtr<forceModel>[nrForceModels()];
for (int i=0;i<nrForceModels();i++)
{
forceModel_[i] = forceModel::New
(
couplingProperties_,
*this,
forceModels_[i]
);
forceModel_[i]().applyDebugSettings(debugMode());
}
momCoupleModel_ = new autoPtr<momCoupleModel>[momCoupleModels_.size()];
for (int i=0;i<momCoupleModels_.size();i++)
{
momCoupleModel_[i] = momCoupleModel::New
(
couplingProperties_,
*this,
momCoupleModels_[i]
);
momCoupleModel_[i]().applyDebugSettings(debugMode());
}
// run liggghts commands from cfdem
liggghtsCommand_ = new autoPtr<liggghtsCommandModel>[liggghtsCommandModelList_.size()];
for (int i=0;i<liggghtsCommandModelList_.size();i++)
{
liggghtsCommand_[i] = liggghtsCommandModel::New
(
liggghtsCommandDict_,
*this,
liggghtsCommandModelList_[i],
i
);
}
Switch cgWarnOnly_(couplingProperties_.lookupOrDefault<Switch>("cgWarnOnly", true));
if (!cgOK_ && cg_ > 1)
{
if(cgWarnOnly_)
Warning<< "at least one of your models is not fit for cg !!!"<< endl;
else
FatalError<< "at least one of your models is not fit for cg !!!"<< abort(FatalError);
}
// check if sim is fully peridic box
const polyBoundaryMesh& patches = mesh_.boundaryMesh();
int nPatchesCyclic(0);
int nPatchesNonCyclic(0);
forAll(patches, patchI)
{
const polyPatch& pp = patches[patchI];
#if defined(versionExt32)
if (isA<cyclicPolyPatch>(pp))
nPatchesCyclic++;
else if (!isA<processorPolyPatch>(pp))
nPatchesNonCyclic++;
#else
if (isA<cyclicPolyPatch>(pp) || isA<cyclicAMIPolyPatch>(pp))
nPatchesCyclic++;
else if (!isA<processorPolyPatch>(pp))
nPatchesNonCyclic++;
#endif
}
if(nPatchesNonCyclic==0)
checkPeriodicCells_=true;
if(nPatchesCyclic>0 && nPatchesNonCyclic>0)
{
if(verbose_) Info << "nPatchesNonCyclic=" << nPatchesNonCyclic << ", nPatchesCyclic=" << nPatchesCyclic << endl;
Warning << "Periodic handing is disabled because the domain is not fully periodic!\n" << endl;
}
}
