src/mathed/math_exfuncinset.C

   1 /**
   2  * \file math_exfuncinset.C
   3  * This file is part of LyX, the document processor.
   4  * Licence details can be found in the file COPYING.
   5  *
   6  * \author André Pönitz
   7  *
   8  * Full author contact details are available in file CREDITS.
   9  */
  10
  11 #include <config.h>
  12
  13 #include "math_exfuncinset.h"
  14 #include "math_support.h"
  15 #include "math_mathmlstream.h"
  16 #include "math_streamstr.h"
  17
  18 using std::auto_ptr;
  19
  20
  21 MathExFuncInset::MathExFuncInset(string const & name)
  22         : MathNestInset(1), name_(name)
  23 {}
  24
  25
  26 MathExFuncInset::MathExFuncInset(string const & name, MathArray const & ar)
  27         : MathNestInset(1), name_(name)
  28 {
  29         cell(0) = ar;
  30 }
  31
  32
  33 auto_ptr<InsetBase> MathExFuncInset::clone() const
  34 {
  35         return auto_ptr<InsetBase>(new MathExFuncInset(*this));
  36 }
  37
  38
  39 void MathExFuncInset::metrics(MetricsInfo & mi, Dimension & /*dim*/) const
  40 {
  41         mathed_string_dim(mi.base.font, name_, dim_);
  42 }
  43
  44
  45 void MathExFuncInset::draw(PainterInfo & pi, int x, int y) const
  46 {
  47         drawStrBlack(pi, x, y, name_);
  48 }
  49
  50
  51 string MathExFuncInset::name() const
  52 {
  53         return name_;
  54 }
  55
  56
  57 void MathExFuncInset::maple(MapleStream & os) const
  58 {
  59         if (name_ == "det")
  60                 os << "linalg[det](" << cell(0) << ')';
  61         else
  62                 os << name_ << '(' << cell(0) << ')';
  63 }
  64
  65
  66 void MathExFuncInset::maxima(MaximaStream & os) const
  67 {
  68         if (name_ == "det")
  69                 os << "determinant(" << cell(0) << ')';
  70         else
  71                 os << name_ << '(' << cell(0) << ')';
  72 }
  73
  74
  75 string asMathematicaName(string const & name)
  76 {
  77         if (name == "sin")    return "Sin";
  78         if (name == "sinh")   return "Sinh";
  79         if (name == "arcsin") return "ArcSin";
  80         if (name == "cos")    return "Cos";
  81         if (name == "cosh")   return "Cosh";
  82         if (name == "arcos")  return "ArcCos";
  83         if (name == "tan")    return "Tan";
  84         if (name == "tanh")   return "Tanh";
  85         if (name == "arctan") return "ArcTan";
  86         if (name == "cot")    return "Cot";
  87         if (name == "coth")   return "Coth";
  88         if (name == "csc")    return "Csc";
  89         if (name == "sec")    return "Sec";
  90         if (name == "exp")    return "Exp";
  91         if (name == "log")    return "Log";
  92         if (name == "ln" )    return "Log";
  93         return name;
  94 }
  95
  96
  97 void MathExFuncInset::mathematica(MathematicaStream & os) const
  98 {
  99         os << asMathematicaName(name_) << '[' << cell(0) << ']';
 100 }
 101
 102
 103 void MathExFuncInset::mathmlize(MathMLStream & os) const
 104 {
 105         os << MTag(name_.c_str()) << cell(0) << ETag(name_.c_str());
 106 }
 107
 108
 109 void MathExFuncInset::octave(OctaveStream & os) const
 110 {
 111         os << name_ << '(' << cell(0) << ')';
 112 }