KokkosLowerBoundNodalKernel.h

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
 
#pragma once
 
#include "KokkosBoundNodalKernel.h"
 
class KokkosLowerBoundNodalKernel final : public KokkosBoundNodalKernel
{
public:
  static InputParameters validParams();
 
  KokkosLowerBoundNodalKernel(const InputParameters & parameters);
 
  KOKKOS_FUNCTION Real getResidual(const unsigned int qp, AssemblyDatum & datum) const;
  KOKKOS_FUNCTION Real getJacobian(const unsigned int qp, AssemblyDatum & datum) const;
  KOKKOS_FUNCTION Real getOffDiagJacobian(const unsigned int jvar,
                                          const unsigned int qp,
                                          AssemblyDatum & datum) const;
 
private:
  const Real _lower_bound;
};
 
KOKKOS_FUNCTION inline Real
KokkosLowerBoundNodalKernel::getResidual(const unsigned int qp, AssemblyDatum & datum) const
{
  return ::Kokkos::min(_u(datum, qp), _v(datum, qp) - _lower_bound);
}
 
KOKKOS_FUNCTION inline Real
KokkosLowerBoundNodalKernel::getJacobian(const unsigned int qp, AssemblyDatum & datum) const
{
  if (_u(datum, qp) <= _v(datum, qp) - _lower_bound)
    return 1;
 
  return 0;
}
 
KOKKOS_FUNCTION inline Real
KokkosLowerBoundNodalKernel::getOffDiagJacobian(const unsigned int jvar,
                                                const unsigned int qp,
                                                AssemblyDatum & datum) const
{
  if (jvar == _v_var)
    if (_v(datum, qp) - _lower_bound < _u(datum, qp))
      return 1;
 
  return 0;
}