void MathExFuncInset::maplize(MapleStream & os) const
{
- os << name_ << '(' << cell(0) << ')';
+ if (name_ == "det")
+ os << "linalg[det](" << cell(0) << ')';
+ else
+ os << name_ << '(' << cell(0) << ')';
+}
+
+
+string asMathematicaName(string const & name)
+{
+ if (name == "sin") return "Sin";
+ if (name == "sinh") return "Sinh";
+ if (name == "arcsin") return "ArcSin";
+ if (name == "cos") return "Cos";
+ if (name == "cosh") return "Cosh";
+ if (name == "arcos") return "ArcCos";
+ if (name == "tan") return "Tan";
+ if (name == "tanh") return "Tanh";
+ if (name == "arctan") return "ArcTan";
+ if (name == "cot") return "Cot";
+ if (name == "coth") return "Coth";
+ if (name == "csc") return "Csc";
+ if (name == "sec") return "Sec";
+ if (name == "exp") return "Exp";
+ if (name == "log") return "Log";
+ if (name == "ln" ) return "Log";
+ return name;
+}
+
+
+void MathExFuncInset::mathematicize(MathematicaStream & os) const
+{
+ os << asMathematicaName(name_) << '[' << cell(0) << ']';
}