33 template<
class CloudType>
45 for (
const typename CloudType::parcelType&
p : this->owner())
51 if (useEquivalentSize_)
53 dEff *=
cbrt(
p.nParticle()*volumeFactor_);
56 rMin =
min(dEff, rMin);
74 template<
class CloudType>
77 typename CloudType::parcelType&
p,
79 const WallSiteData<vector>& data,
85 vector r_PW =
p.position() - site;
87 vector U_PW =
p.U() - data.wallData();
89 scalar r_PW_mag =
mag(r_PW);
91 scalar normalOverlapMag =
max(pREff - r_PW_mag, 0.0);
93 vector rHat_PW = r_PW/(r_PW_mag + VSMALL);
95 scalar etaN = alpha_*
sqrt(
p.mass()*kN)*
pow025(normalOverlapMag);
99 *(kN*
pow(normalOverlapMag, b_) - etaN*(U_PW & rHat_PW));
106 -cohesionEnergyDensity_
114 U_PW - (U_PW & rHat_PW)*rHat_PW
115 + (
p.omega() ^ (pREff*-rHat_PW));
117 scalar deltaT = this->owner().mesh().time().deltaTValue();
119 vector& tangentialOverlap_PW =
120 p.collisionRecords().matchWallRecord(-r_PW, pREff).collisionData();
122 tangentialOverlap_PW += USlip_PW*deltaT;
124 scalar tangentialOverlapMag =
mag(tangentialOverlap_PW);
126 if (tangentialOverlapMag > VSMALL)
128 scalar kT = 8.0*
sqrt(pREff*normalOverlapMag)*Gstar_;
135 if (kT*tangentialOverlapMag > mu_*
mag(fN_PW))
140 fT_PW = -mu_*
mag(fN_PW)*USlip_PW/
mag(USlip_PW);
142 tangentialOverlap_PW =
Zero;
146 fT_PW = - kT*tangentialOverlap_PW - etaT*USlip_PW;
151 p.torque() += (pREff*-rHat_PW) ^ fT_PW;
158 template<
class CloudType>
168 alpha_(this->coeffDict().getScalar(
"alpha")),
169 b_(this->coeffDict().getScalar(
"b")),
170 mu_(this->coeffDict().getScalar(
"mu")),
171 cohesionEnergyDensity_
173 this->coeffDict().getScalar(
"cohesionEnergyDensity")
176 collisionResolutionSteps_
178 this->coeffDict().getScalar(
"collisionResolutionSteps")
181 useEquivalentSize_(
Switch(this->coeffDict().
lookup(
"useEquivalentSize")))
183 if (useEquivalentSize_)
196 Estar_ = 1/((1 -
sqr(pNu))/pE + (1 -
sqr(
nu))/E);
198 Gstar_ = 1/(2*((2 + pNu -
sqr(pNu))/pE + (2 +
nu -
sqr(
nu))/E));
200 cohesion_ = (
mag(cohesionEnergyDensity_) > VSMALL);
206 template<
class CloudType>
213 template<
class CloudType>
219 if (useEquivalentSize_)
221 return p.d()/2*
cbrt(
p.nParticle()*volumeFactor_);
228 template<
class CloudType>
235 template<
class CloudType>
238 if (!(this->owner().size()))
247 findMinMaxProperties(rMin,
rhoMax, UMagMax);
250 scalar minCollisionDeltaT =
254 /collisionResolutionSteps_;
256 return ceil(this->owner().time().deltaTValue()/minCollisionDeltaT);
260 template<
class CloudType>
270 scalar pREff = this->pREff(
p);
272 scalar kN = (4.0/3.0)*
sqrt(pREff)*Estar_;
274 forAll(flatSitePoints, siteI)
279 flatSitePoints[siteI],
287 forAll(sharpSitePoints, siteI)
294 sharpSitePoints[siteI],
295 sharpSiteData[siteI],