Discussion about math, puzzles, games and fun. Useful symbols: ÷ × ½ √ ∞ ≠ ≤ ≥ ≈ ⇒ ± ∈ Δ θ ∴ ∑ ∫ π -¹ ² ³ °

You are not logged in.

- Topics: Active | Unanswered

Pages: **1**

**bobbym****Administrator**- From: Bumpkinland
- Registered: 2009-04-12
- Posts: 94,485

The problem begins here:

http://www.mathisfunforum.com/viewtopic.php?id=14345

At that link you will much useful discussion between gAr, Bob Bundy and myself. Without that there would be no answer here at all.

First, it is not much of a problem for Mathematica. He spits out π / 2 faster than you can say Maple. So what is the point of this post? Well let us see if we can at least appear to be solving the problem.

This is how a package jockey does it. We want to evaluate:

To evalute this we need the poles which are the zeroes of the denominator. This is the first obstacle.

None of the packages can factor the 12th degree denominator. They can do it numerically but this is a case where the exact answer is needed.

Without getting too heavy into it the reason they can not is because they all are set by default to the field of integers. So when we try to factor we get,

That is not good enough. When we use

Factor[x^12-10 x^10+37 x^8-42 x^6+26 x^4-8 ,Extension->{I}]

We get:

This is much better, we can now get the poles exactly, they may be long and ugly but they will be exact.

The roots ( poles ) are:

There are 4 groups of these, consisiting of the conjugates and the negations.

We take only the poles that are in the upper half of the contour.

Finding the residues of the six poles that count, for that we use the residue command.

Summing the residues:

This method evaluates integrals from -∞ to ∞, ours is from 0 to ∞, since the integral is symmetric the answer is:

This is how a human does it:

**In mathematics, you don't understand things. You just get used to them.**

**If it ain't broke, fix it until it is.**

Offline

Pages: **1**