static_scalar_input.cpp

/******************************************************************************
 * Copyright (C) Siarhei Uzunbajakau, 2023.
 *
 * This program is free software. You can use, modify, and redistribute it under
 * the terms of the GNU Lesser General Public License as published by the Free
 * Software Foundation, either version 3 or (at your option) any later version.
 * This program is distributed without any warranty.
 *
 * Refer to COPYING.LESSER for more details.
 ******************************************************************************/
 
#include <deal.II/base/types.h>
#define BOOST_ALLOW_DEPRECATED_HEADERS
 
#include "static_scalar_input.hpp"
#include <math.h>
 
#pragma GCC diagnostic push
#pragma GCC diagnostic ignored "-Wunused-parameter"
#pragma GCC diagnostic ignored "-Wunused-but-set-variable"
 
template<>
void
StaticScalarSolver::TheCoefficient<2>::value_list(
  const std::vector<Point<2>>& r,
  types::material_id mid,
  unsigned int cuid,
  std::vector<double>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  for (unsigned int i = 0; i < values.size(); i++)
    values[i] = 1.0;
}
 
template<>
void
StaticScalarSolver::PdeRhs<2>::value_list(const std::vector<Point<2>>& r,
                                          types::material_id mid,
                                          unsigned int cuid,
                                          std::vector<double>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  for (unsigned int i = 0; i < values.size(); i++)
    values[i] = 0.0;
}
 
template<>
void
StaticScalarSolver::PdeRhsCvp<2>::value_list(
  const std::vector<Point<2>>& r,
  types::material_id mid,
  unsigned int cuid,
  std::vector<Tensor<1, 2>>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  auto v = values.begin();
  for (auto p : r) {
    if (mid == mid_2) {
      (*v)[0] = -p[1];
      (*v)[1] = p[0];
    } else {
      (*v)[0] = 0.0;
      (*v)[1] = 0.0;
    }
    v++;
  }
}
 
template<>
void
StaticScalarSolver::Gamma<2>::value_list(const std::vector<Point<2>>& r,
                                         const std::vector<Tensor<1, 2>>& n,
                                         types::boundary_id bid,
                                         types::material_id mid,
                                         unsigned int cuid,
                                         unsigned int fuid,
                                         std::vector<double>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  for (unsigned int i = 0; i < values.size(); i++)
    values[i] = 0.0;
}
 
template<>
void
StaticScalarSolver::RobinRhs<2>::value_list(const std::vector<Point<2>>& r,
                                            const std::vector<Tensor<1, 2>>& n,
                                            types::boundary_id bid,
                                            types::material_id mid,
                                            unsigned int cuid,
                                            unsigned int fuid,
                                            std::vector<double>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  for (unsigned int i = 0; i < values.size(); i++)
    values[i] = 0.0;
}
 
template<>
void
StaticScalarSolver::FreeSurfaceCharge<2>::value_list(
  const std::vector<Point<2>>& r,
  const std::vector<Tensor<1, 2>>& n,
  types::material_id mid,
  unsigned int cuid,
  unsigned int fuid,
  std::vector<double>& values) const
{
  Assert(r.size() == values.size(),
         ExcDimensionMismatch(r.size(), values.size()));
 
  for (unsigned int i = 0; i < values.size(); i++)
    values[i] = 0.0;
}
 
template<>
double
StaticScalarSolver::Weight<2>::value(const Point<2>& r,
                                     const unsigned int component) const
{
  return 1.0;
}
 
#pragma GCC diagnostic pop