ACInterfaceChangedVariable.C

Go to the documentation of this file.

//* This file is part of the MOOSE framework
//* https://mooseframework.inl.gov
//*
//* All rights reserved, see COPYRIGHT for full restrictions
//* https://github.com/idaholab/moose/blob/master/COPYRIGHT
//*
//* Licensed under LGPL 2.1, please see LICENSE for details
//* https://www.gnu.org/licenses/lgpl-2.1.html
 
 
#include "ACInterfaceChangedVariable.h"
 
registerMooseObject("PhaseFieldApp", ACInterfaceChangedVariable);
 
InputParameters
ACInterfaceChangedVariable::validParams()
{
  InputParameters params = ACInterface::validParams();
  params.addClassDescription("Gradient energy Allen-Cahn Kernel using a change of variable");
  params.addRequiredParam<MaterialPropertyName>(
      "order_parameter", "Order parameter material defnining the change of variable function");
  return params;
}
 
ACInterfaceChangedVariable::ACInterfaceChangedVariable(const InputParameters & parameters)
  : ACInterface(parameters),
    _dopdu(getMaterialPropertyDerivative<Real>("order_parameter", _var.name())),
    _d2opdu2(getMaterialPropertyDerivative<Real>("order_parameter", _var.name(), _var.name()))
{
}
 
void
ACInterfaceChangedVariable::initialSetup()
{
  validateCoupling<Real>("order_parameter");
}
 
Real
ACInterfaceChangedVariable::computeQpResidual()
{
  return ACInterface::computeQpResidual() * _dopdu[_qp];
}
 
Real
ACInterfaceChangedVariable::computeQpJacobian()
{
  return ACInterface::computeQpJacobian() * _dopdu[_qp] +
         ACInterface::computeQpResidual() * _d2opdu2[_qp] * _phi[_j][_qp];
}