X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Finifcns.h;h=4c63c8c422ceae2fc98f1878edbd4c34a3fc5475;hp=176f67943ccbfecdb9af7fb7ba4f035aae790196;hb=5a5e6000ab35190c0cf7e0be956c2334ecfec5c9;hpb=2db113296f65f8fd3a0d62781ddc9276ff07b487 diff --git a/ginac/inifcns.h b/ginac/inifcns.h index 176f6794..4c63c8c4 100644 --- a/ginac/inifcns.h +++ b/ginac/inifcns.h @@ -32,6 +32,12 @@ namespace GiNaC { /** Absolute value. */ DECLARE_FUNCTION_1P(abs) + +/** Complex sign. */ +DECLARE_FUNCTION_1P(csgn) + +/** Eta function: log(a*b) == log(a) + log(b) + eta(a, b). */ +DECLARE_FUNCTION_2P(eta) /** Sine. */ DECLARE_FUNCTION_1P(sin) @@ -84,36 +90,37 @@ DECLARE_FUNCTION_1P(Li2) /** Trilogarithm. */ DECLARE_FUNCTION_1P(Li3) -// overloading at work: we cannot use the macros +// overloading at work: we cannot use the macros here /** Riemann's Zeta-function. */ extern const unsigned function_index_zeta1; inline function zeta(const ex & p1) { - return function(function_index_zeta1, p1); + return function(function_index_zeta1, p1); } /** Derivatives of Riemann's Zeta-function. */ extern const unsigned function_index_zeta2; inline function zeta(const ex & p1, const ex & p2) { - return function(function_index_zeta2, p1, p2); + return function(function_index_zeta2, p1, p2); } /** Gamma-function. */ -DECLARE_FUNCTION_1P(gamma) +DECLARE_FUNCTION_1P(lgamma) +DECLARE_FUNCTION_1P(tgamma) /** Beta-function. */ DECLARE_FUNCTION_2P(beta) -// overloading at work: we cannot use the macros +// overloading at work: we cannot use the macros here /** Psi-function (aka digamma-function). */ extern const unsigned function_index_psi1; inline function psi(const ex & p1) { - return function(function_index_psi1, p1); + return function(function_index_psi1, p1); } /** Derivatives of Psi-function (aka polygamma-functions). */ extern const unsigned function_index_psi2; inline function psi(const ex & p1, const ex & p2) { - return function(function_index_psi2, p1, p2); + return function(function_index_psi2, p1, p2); } - + /** Factorial function. */ DECLARE_FUNCTION_1P(factorial) @@ -123,9 +130,6 @@ DECLARE_FUNCTION_2P(binomial) /** Order term function (for truncated power series). */ DECLARE_FUNCTION_1P(Order) -/** Inert differentiation. */ -DECLARE_FUNCTION_2P(Diff) - /** Inert partial differentiation operator. */ DECLARE_FUNCTION_2P(Derivative) @@ -135,7 +139,7 @@ ex ncpower(const ex &basis, unsigned exponent); inline bool is_order_function(const ex & e) { - return is_ex_the_function(e, Order); + return is_ex_the_function(e, Order); } #ifndef NO_NAMESPACE_GINAC