diff --git a/src/lagrangian/intermediate/submodels/Thermodynamic/SurfaceFilmModel/ThermoSurfaceFilm/ThermoSurfaceFilm.C b/src/lagrangian/intermediate/submodels/Thermodynamic/SurfaceFilmModel/ThermoSurfaceFilm/ThermoSurfaceFilm.C index 4eee7d990c5a6020f7298877c962e90268c9a49a..3e1a29e988a3fd7dee54e634acba0bee5c94f08a 100644 --- a/src/lagrangian/intermediate/submodels/Thermodynamic/SurfaceFilmModel/ThermoSurfaceFilm/ThermoSurfaceFilm.C +++ b/src/lagrangian/intermediate/submodels/Thermodynamic/SurfaceFilmModel/ThermoSurfaceFilm/ThermoSurfaceFilm.C @@ -398,13 +398,15 @@ void Foam::ThermoSurfaceFilm<CloudType>::splashInteraction // surface energy of secondary parcels [J] scalar ESigmaSec = 0; - // sample splash distribution to detrmine secondary parcel diameters + // sample splash distribution to determine secondary parcel diameters scalarList dNew(parcelsPerSplash_); + scalarList npNew(parcelsPerSplash_); forAll(dNew, i) { const scalar y = rndGen_.sample01<scalar>(); dNew[i] = -dBarSplash*log(exp(-dMin/dBarSplash) - y*K); - ESigmaSec += sigma*p.areaS(dNew[i]); + npNew[i] = mRatio*np*pow3(d)/pow3(dNew[i])/parcelsPerSplash_; + ESigmaSec += npNew[i]*sigma*p.areaS(dNew[i]); } // incident kinetic energy [J] @@ -459,7 +461,7 @@ void Foam::ThermoSurfaceFilm<CloudType>::splashInteraction // perturb new parcels towards the owner cell centre pPtr->position() += 0.5*rndGen_.sample01<scalar>()*(posC - posCf); - pPtr->nParticle() = mRatio*np*pow3(d)/pow3(dNew[i])/parcelsPerSplash_; + pPtr->nParticle() = npNew[i]; pPtr->d() = dNew[i];