Blame view

Giac_maj/epsilon-giac/poincare/src/hyperbolic_arc_tangent.cpp 819 Bytes
6663b6c9   adorian   projet complet av...
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
  #include <poincare/hyperbolic_arc_tangent.h>
  extern "C" {
  #include <assert.h>
  }
  #include <cmath>
  
  namespace Poincare {
  
  HyperbolicArcTangent::HyperbolicArcTangent() :
    Function("atanh")
  {
  }
  
  Expression::Type HyperbolicArcTangent::type() const {
    return Type::HyperbolicArcTangent;
  }
  
  Expression * HyperbolicArcTangent::cloneWithDifferentOperands(Expression** newOperands,
          int numberOfOperands, bool cloneOperands) const {
    assert(newOperands != nullptr);
    HyperbolicArcTangent * t = new HyperbolicArcTangent();
    t->setArgument(newOperands, numberOfOperands, cloneOperands);
    return t;
  }
  
  template<typename T>
  Complex<T> HyperbolicArcTangent::templatedComputeComplex(const Complex<T> c) const {
    if (c.b() != 0) {
      return Complex<T>::Float(NAN);
    }
    return Complex<T>::Float(std::atanh(c.a()));
  }
  
  }