tgamma
double tgamma(double);
#define tgamma(x) __tg_simple(x, tgamma)
PROTO_NORMAL(tgamma);
DEF_STD(tgamma);
LDBL_MAYBE_UNUSED_CLONE(tgamma);
return tgamma(x);
y = tgamma(y);
y = -x*tgamma(-x);
{"tgamma", tgamma, &NAN, &NAN, 0},
{"tgamma", tgamma, &INF, &INF, 0},
{"tgamma", tgamma, &MONE, &NAN, 0},
{"tgamma", tgamma, &ZERO, &INF, 0},
{"tgamma", tgamma, &MINF, &NAN, 0},
double tgamma (double);
x = tgamma(NAN);
x = tgamma(11.0); /* (11 - 1)! */
x = tgamma(3.5); /* 15/8 * sqrt(pi) */
x = tgamma(-0.5); /* -2 * sqrt(pi) */
x = tgamma(-1); /* Negative integers */
x = tgamma(-177.8); /* x ~< -177.79 */
x = tgamma(171.64); /* x ~> 171.63 */
x = tgamma(0.0);
x = tgamma(-0.0);
x = tgamma(-HUGE_VAL);
x = tgamma(HUGE_VAL);