#include <StressDivergenceRSpherical.h>

Inheritance diagram for StressDivergenceRSpherical:

Public Member Functions
	StressDivergenceRSpherical (const InputParameters &parameters)

virtual	~StressDivergenceRSpherical ()

Protected Member Functions
virtual Real	computeQpResidual ()

virtual Real	computeQpJacobian ()

virtual Real	computeQpOffDiagJacobian (unsigned int jvar)

Protected Attributes
const MaterialProperty< SymmTensor > &	_stress

const MaterialProperty< SymmElasticityTensor > &	_Jacobian_mult

const MaterialProperty< SymmTensor > &	_d_stress_dT

Private Attributes
const unsigned int	_component

const bool	_temp_coupled

const unsigned int	_temp_var

Detailed Description

Definition at line 18 of file StressDivergenceRSpherical.h.

Constructor & Destructor Documentation

◆ StressDivergenceRSpherical()

StressDivergenceRSpherical::StressDivergenceRSpherical ( const InputParameters & parameters )

Definition at line 43 of file StressDivergenceRSpherical.C.

   : Kernel(parameters),
     _stress(getMaterialProperty<SymmTensor>("stress")),
     _Jacobian_mult(getMaterialProperty<SymmElasticityTensor>("Jacobian_mult")),
     _d_stress_dT(getMaterialProperty<SymmTensor>("d_stress_dT")),
     _component(getParam<unsigned int>("component")),
     _temp_coupled(isCoupled("temp")),
     _temp_var(_temp_coupled ? coupled("temp") : 0)
 {
   mooseDeprecated(name(), ": StressDivergenceRSpherical is deprecated. \
                   The solid_mechanics module will be removed from MOOSE on July 31, 2020. \
                   Please update your input files to utilize the tensor_mechanics equivalents of \
                   models based on solid_mechanics. A detailed migration guide that was developed \
                   for BISON, but which is generally applicable to any MOOSE model is available at: \
                   https://mooseframework.org/bison/tutorials/mechanics_conversion/overview.html");
 }

◆ ~StressDivergenceRSpherical()

virtual StressDivergenceRSpherical::~StressDivergenceRSpherical ( )

inlinevirtual

Definition at line 22 of file StressDivergenceRSpherical.h.

22 {}

Member Function Documentation

◆ computeQpJacobian()

Real StressDivergenceRSpherical::computeQpJacobian ( )

protectedvirtual

Definition at line 74 of file StressDivergenceRSpherical.C.

 {
   Real val(1);
   if (_component == 0)
   {
     SymmTensor test, phi;
     test.xx() = _grad_test[_i][_qp](0);
     test.yy() = _test[_i][_qp] / _q_point[_qp](0);
     test.zz() = test.yy();
     phi.xx() = _grad_phi[_j][_qp](0);
     phi.yy() = _phi[_j][_qp] / _q_point[_qp](0);
     phi.zz() = phi.yy();
  
     SymmTensor tmp(_Jacobian_mult[_qp] * phi);
     val = test.doubleContraction(tmp);
   }
   else if (_i != _j)
   {
     val = 0;
   }
   return val;
 }

◆ computeQpOffDiagJacobian()

Real StressDivergenceRSpherical::computeQpOffDiagJacobian ( unsigned int jvar )

protectedvirtual

Definition at line 98 of file StressDivergenceRSpherical.C.

 {
  
   if (_temp_coupled && jvar == _temp_var)
   {
     SymmTensor test;
     test.xx() = _grad_test[_i][_qp](0);
     test.yy() = _test[_i][_qp] / _q_point[_qp](0);
     test.zz() = test.yy();
     return _d_stress_dT[_qp].doubleContraction(test) * _phi[_j][_qp];
   }
  
   return 0;
 }

◆ computeQpResidual()

Real StressDivergenceRSpherical::computeQpResidual ( )

protectedvirtual

Definition at line 61 of file StressDivergenceRSpherical.C.

 {
   Real div(0);
   if (_component == 0)
   {
     div = _grad_test[_i][_qp](0) * _stress[_qp].xx() +
           _test[_i][_qp] / _q_point[_qp](0) * _stress[_qp].yy() +
           _test[_i][_qp] / _q_point[_qp](0) * _stress[_qp].zz();
   }
   return div;
 }