summaryrefslogtreecommitdiff
path: root/src/Coxeter_triangulation/include/gudhi/Functions/Function_Sm_in_Rd.h
blob: f3ae577a6d7b067d3d05e35a4fca17ccc7c6a5f7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
/*    This file is part of the Gudhi Library - https://gudhi.inria.fr/ - which is released under MIT.
 *    See file LICENSE or go to https://gudhi.inria.fr/licensing/ for full license details.
 *    Author(s):       Siargey Kachanovich
 *
 *    Copyright (C) 2019 Inria
 *
 *    Modification(s):
 *      - YYYY/MM Author: Description of the modification
 */

#ifndef FUNCTIONS_FUNCTION_SM_IN_RD_H_
#define FUNCTIONS_FUNCTION_SM_IN_RD_H_

#include <gudhi/Functions/Function.h>
#include <Eigen/Dense>

namespace Gudhi {

namespace coxeter_triangulation {

/** 
 * \class Function_Sm_in_Rd 
 * \brief A class for the function that defines an m-dimensional implicit sphere embedded
 * in the d-dimensional Euclidean space.
 *
 * \ingroup coxeter_triangulation
 */
struct Function_Sm_in_Rd: public Function {

/** \brief Value of the function at a specified point.
 * @param[in] p The input point. The dimension needs to coincide with the ambient dimension.
 */
  virtual Eigen::VectorXd operator()(const Eigen::VectorXd& p) const override {
    Eigen::VectorXd x = p;
    for (std::size_t i = 0; i < d_; ++i)
      x(i) -= center_[i];
    Eigen::VectorXd result = Eigen::VectorXd::Zero(k_); 
    for (std::size_t i = 0; i < m_+1; ++i)
      result(0) += x(i)*x(i);
    result(0) -= r_*r_;
    for (std::size_t j = 1; j < k_; ++j)
      result(j) = x(m_+j);
    return result;
  }
  
  /** \brief Returns the domain dimension. Same as the ambient dimension of the sphere. */
  virtual std::size_t amb_d() const override {return d_;};

  /** \brief Returns the codomain dimension. Same as the codimension of the sphere. */
  virtual std::size_t cod_d() const override {return k_;};

  /** \brief Returns a point on the sphere. */
  virtual Eigen::VectorXd seed() const override {
    Eigen::VectorXd result = Eigen::VectorXd::Zero(d_);
    result(0) += r_;
    for (std::size_t i = 0; i < d_; ++i)
      result(i) += center_[i];
    return result;
  }
    
  /** 
   * \brief Constructor of the function that defines an m-dimensional implicit sphere embedded
   * in the d-dimensional Euclidean space.
   *
   * @param[in] r The radius of the sphere.
   * @param[in] m The dimension of the sphere.
   * @param[in] d The ambient dimension of the sphere.
   * @param[in] center The center of the sphere.
   */
  Function_Sm_in_Rd(double r,
		    std::size_t m,
		    std::size_t d,
		    Eigen::VectorXd center)
    : m_(m), k_(d-m), d_(d), r_(r), center_(center) {}

  /** 
   * \brief Constructor of the function that defines an m-dimensional implicit sphere embedded
   * in the d-dimensional Euclidean space centered at the origin.
   *
   * @param[in] r The radius of the sphere.
   * @param[in] m The dimension of the sphere.
   * @param[in] d The ambient dimension of the sphere.
   */
  Function_Sm_in_Rd(double r,
		    std::size_t m,
		    std::size_t d)
    : m_(m), k_(d-m), d_(d), r_(r), center_(Eigen::VectorXd::Zero(d_)) {}

  
  /** 
   * \brief Constructor of the function that defines an m-dimensional implicit sphere embedded
   * in the (m+1)-dimensional Euclidean space.
   *
   * @param[in] r The radius of the sphere.
   * @param[in] m The dimension of the sphere.
   * @param[in] center The center of the sphere.
   */
  Function_Sm_in_Rd(double r,
		    std::size_t m,
		    Eigen::VectorXd center)
    : m_(m), k_(1), d_(m_+1), r_(r), center_(center) {}

  /** 
   * \brief Constructor of the function that defines an m-dimensional implicit sphere embedded
   * in the (m+1)-dimensional Euclidean space centered at the origin.
   *
   * @param[in] r The radius of the sphere.
   * @param[in] m The dimension of the sphere.
   */
  Function_Sm_in_Rd(double r,
		    std::size_t m)
    : m_(m), k_(1), d_(m_+1), r_(r), center_(Eigen::VectorXd::Zero(d_)) {}

  Function_Sm_in_Rd(const Function_Sm_in_Rd& rhs)
    : Function_Sm_in_Rd(rhs.r_, rhs.m_, rhs.d_, rhs.center_) {}

  
protected:
  std::size_t m_, k_, d_;
  double r_;
  Eigen::VectorXd center_;
};

} // namespace coxeter_triangulation

} // namespace Gudhi


#endif