Line data    Source code

       1             : //* This file is part of the MOOSE framework
       2             : //* https://www.mooseframework.org
       3             : //*
       4             : //* All rights reserved, see COPYRIGHT for full restrictions
       5             : //* https://github.com/idaholab/moose/blob/master/COPYRIGHT
       6             : //*
       7             : //* Licensed under LGPL 2.1, please see LICENSE for details
       8             : //* https://www.gnu.org/licenses/lgpl-2.1.html
       9             : 
      10             : #include "ComputeLagrangianWrappedStress.h"
      11             : 
      12             : registerMooseObject("TensorMechanicsApp", ComputeLagrangianWrappedStress);
      13             : 
      14             : InputParameters
      15         192 : ComputeLagrangianWrappedStress::validParams()
      16             : {
      17         192 :   InputParameters params = ComputeLagrangianObjectiveStress::validParams();
      18             : 
      19         384 :   params.addParam<MaterialPropertyName>("input_stress",
      20             :                                         "stress",
      21             :                                         "The name of the engineering stress from the "
      22             :                                         "wrapped material");
      23         384 :   params.addParam<MaterialPropertyName>("input_jacobian",
      24             :                                         "Jacobian_mult",
      25             :                                         "The name of the engineering "
      26             :                                         "stress/strain Jacobian from the wrapped material");
      27             : 
      28         192 :   return params;
      29           0 : }
      30             : 
      31         144 : ComputeLagrangianWrappedStress::ComputeLagrangianWrappedStress(const InputParameters & parameters)
      32             :   : ComputeLagrangianObjectiveStress(parameters),
      33         144 :     _input_stress(getMaterialPropertyByName<RankTwoTensor>(
      34         144 :         _base_name + getParam<MaterialPropertyName>("input_stress"))),
      35         144 :     _input_jacobian(getMaterialPropertyByName<RankFourTensor>(
      36         432 :         _base_name + getParam<MaterialPropertyName>("input_jacobian")))
      37             : {
      38         144 : }
      39             : 
      40             : void
      41     6388448 : ComputeLagrangianWrappedStress::computeQpSmallStress()
      42             : {
      43             :   // Well this ends up being trivial...
      44     6388448 :   _small_stress[_qp] = _input_stress[_qp];
      45     6388448 :   _small_jacobian[_qp] = _input_jacobian[_qp];
      46     6388448 : }