foam-extend4.1-coherent-io/applications/solvers/solidMechanics/elasticGravitySolidFoam/calculateDivSigmaExp.H

if(divSigmaExpMethod == "standard")
{
    divSigmaExp = fvc::div
    (
       mu*gradU.T() + lambda*(I*tr(gradU)) - (mu + lambda)*gradU,
       "div(sigma)"
    );
}
else if(divSigmaExpMethod == "surface")
{
    divSigmaExp = fvc::div
    (
        muf*(mesh.Sf() & fvc::interpolate(gradU.T()))
      + lambdaf*(mesh.Sf() & I*fvc::interpolate(tr(gradU)))
      - (muf + lambdaf)*(mesh.Sf() & fvc::interpolate(gradU))
    );
}
else if(divSigmaExpMethod == "decompose")
{
    surfaceTensorField shearGradU = ((I - n*n)&fvc::interpolate(gradU));

    divSigmaExp = fvc::div
    (
        mesh.magSf()
       *(
          - (muf + lambdaf)*(fvc::snGrad(U)&(I - n*n))
          + lambdaf*tr(shearGradU&(I - n*n))*n
          + muf*(shearGradU&n)
        )
    );
}
else if(divSigmaExpMethod == "expLaplacian")
{
    divSigmaExp =
        - fvc::laplacian(mu + lambda, U, "laplacian(DU,U)")
        + fvc::div
          (
              mu*gradU.T()
            + lambda*(I*tr(gradU)),
              "div(sigma)"
          );
}
else
{
    FatalError << "divSigmaExp method " << divSigmaExpMethod << " not found!" << endl;
}