MFEMEigenproblem.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
 
#ifdef MOOSE_MFEM_ENABLED
 
#include "MFEMEigenproblem.h"
#include "MFEMVariable.h"
#include "MFEMEigensolverBase.h"
 
registerMooseObject("MooseApp", MFEMEigenproblem);
 
InputParameters
MFEMEigenproblem::validParams()
{
  InputParameters params = MFEMProblem::validParams();
  params.addClassDescription("Problem type for building and solving a finite element eigenproblem "
                             "using the MFEM finite element library.");
  params.addParam<int>("num_modes", 1, "Set the number of lowest eigenmodes to compute.");
  params.addParam<std::string>(
      "mode_separator",
      "_",
      "Separator string inserted between a variable name and its eigenmode index when "
      "registering the gridfunction that stores the corresponding eigenvector.");
  params.addParam<MFEMScalarCoefficientName>(
      "rhs_coefficient",
      "1.",
      "Name of the coefficient to scale the right-hand side of the eigenproblem equation by.");
  params.addParam<MFEMMatrixCoefficientName>("rhs_matrix_coefficient",
                                             "Name of the matrix coefficient to scale the "
                                             "right-hand side of the eigenproblem equation by.");
 
  return params;
}
 
MFEMEigenproblem::MFEMEigenproblem(const InputParameters & params) : MFEMProblem(params)
{
  getProblemData().mode_separator = getParam<std::string>("mode_separator");
  if (_num_type == NumericType::COMPLEX)
    mooseError("Complex numbers are not currently supported for eigenproblems.");
 
  if (isParamSetByUser("rhs_matrix_coefficient") && isParamSetByUser("rhs_coefficient"))
    paramError("rhs_coefficient",
               "Only one of 'rhs_coefficient' and 'rhs_matrix_coefficient' may be set to a "
               "non-default value.");
}
 
Moose::MFEM::EigenRHSCoefficient
MFEMEigenproblem::getRHSCoefficient()
{
  if (isParamSetByUser("rhs_matrix_coefficient"))
    return &getCoefficients().getMatrixCoefficient(
        getParam<MFEMMatrixCoefficientName>("rhs_matrix_coefficient"));
  return &getCoefficients().getScalarCoefficient(
      getParam<MFEMScalarCoefficientName>("rhs_coefficient"));
}
 
void
MFEMEigenproblem::addVariable(const std::string & var_type,
                              const std::string & var_name,
                              InputParameters & parameters)
{
  validateVariableNumericType(var_type, var_name);
 
  // Reject names that would collide with the mode-suffix convention or with any
  // already-registered eigenmode storage entry.
  const auto num_modes = getParam<int>("num_modes");
  const auto & sep = getProblemData().mode_separator;
  if (getProblemData().gridfunctions.Has(var_name))
    mooseError("MFEM variable '",
               var_name,
               "' clashes with an existing gridfunction (likely an eigenmode entry from another "
               "variable). Choose a different variable name or set 'mode_separator' to a string "
               "that avoids the clash.");
 
  for (int i = 0; i < num_modes; ++i)
  {
    const auto mode_name = var_name + sep + std::to_string(i);
    if (getProblemData().gridfunctions.Has(mode_name))
      mooseError("Eigenmode storage name '",
                 mode_name,
                 "' for variable '",
                 var_name,
                 "' clashes with an already-registered variable. Set 'mode_separator' to a "
                 "string that avoids the clash, or rename the conflicting variable.");
  }
 
  addGridFunction(var_type, var_name, parameters);
 
  for (int i = 0; i < num_modes; ++i)
    addGridFunction(var_type, var_name + sep + std::to_string(i), parameters);
}
 
void
MFEMEigenproblem::resolveMFEMSolvers()
{
  MFEMProblem::resolveMFEMSolvers();
 
  if (getProblemData().nonlinear_solver)
    mooseError("MFEMEigenproblem does not support nonlinear solver '",
               getProblemData().nonlinear_solver->name(),
               "'.");
 
  if (getProblemData().jacobian_solver &&
      !std::dynamic_pointer_cast<Moose::MFEM::EigensolverBase>(getProblemData().jacobian_solver))
    mooseError("The selected solver '",
               getProblemData().jacobian_solver->name(),
               "' is not an eigensolver, but the problem is marked as an eigenproblem.");
}
 
#endif