14 lines
490 B
C
14 lines
490 B
C
// * * * * * * * * * * * * * * * * NET FORCES * * * * * * * * * * * * * * * //
|
|
|
|
vectorField netForces(mesh.boundary().size(), vector::zero);
|
|
|
|
Info << nl;
|
|
forAll(netForces, patchI)
|
|
{
|
|
netForces[patchI] = gSum(mesh.Sf().boundaryField()[patchI] & sigma.boundaryField()[patchI]);
|
|
|
|
Info << "patch\t" << mesh.boundary()[patchI].name() << "\t\tnet force is\t"
|
|
<< netForces[patchI] << " N" << endl;
|
|
}
|
|
|
|
// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
|