#include #include #include extern "C" { #include } #include namespace Poincare { Expression::Type HyperbolicArcCosine::type() const { return Type::HyperbolicArcCosine; } Expression * HyperbolicArcCosine::clone() const { HyperbolicArcCosine * a = new HyperbolicArcCosine(m_operands, true); return a; } Expression * HyperbolicArcCosine::shallowReduce(Context& context, AngleUnit angleUnit) { Expression * e = Expression::shallowReduce(context, angleUnit); if (e != this) { return e; } #if MATRIX_EXACT_REDUCING Expression * op = editableOperand(0); if (op->type() == Type::Matrix) { return SimplificationEngine::map(this, context, angleUnit); } #endif return this; } template std::complex HyperbolicArcCosine::computeOnComplex(const std::complex c, AngleUnit angleUnit) { std::complex result = std::acosh(c); /* asinh has a branch cut on ]-inf, 1]: it is then multivalued * on this cut. We followed the convention chosen by the lib c++ of llvm on * ]-inf+0i, 1+0i] (warning: atanh takes the other side of the cut values on * ]-inf-0i, 1-0i[).*/ return Trigonometry::RoundToMeaningfulDigits(result); } }