OFFSET
0,4
MATHEMATICA
g[x_] = x^3/(-1 - x + x^3) h[x_, n_] = Dt[g[x], {x, n}] a[x_] = Table[h[x, n], {n, 0, 25}]; b = a[0] Abs[b]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Jun 29 2005
STATUS
approved