Application Center - Maplesoft

App Preview:

Calculus II: Lesson 3: Applications of Integration 1: Work

You can switch back to the summary page by clicking here.

Learn about Maple
Download Application


 

L3-integrationAppsWork.mws

Calculus II

Lesson 3: Applications of Integration 1: Work

When a force moves an object, we say the force does work. If the force F is constant, the work done is given by the equation W = Fd , where d is the distance moved. What happens if the force is not constant?

Suppose, for definiteness, that a force F(x) moves an object from a to b along the x -axis. Although F depends on x , we can divide the interval [a, b] into small subintervals, and suppose that F is almost constant on each subinterval.

Let's see why the expression sum(F(a+k*(b-a)/n),k = 1 .. n) (b-a)/n should be an approximation to the total work done in moving the object from a to b .

When we divide the interval [a, b] into n equal subintervals, each subinterval has length (b-a)/n . If n is large, each subinterval will be very short, and so the force on the k -th subinterval can be approximated by its value at any point in the subinterval. We will choose the right-hand endpoint of the subinterval, which is the point a+k*(b-a)/n . The force on the k -th subinterval is therefore approximately F(a+k*(b-a)/n) , and the work done in moving across this subinterval, using the constant-force formula, is approximately F(a+k*(b-a)/n) (b-a)/n . The total work done in moving from a to b is given by adding up n of these terms, one for each subinterval, which gives the formula in the statement of the question.

Let's write a Maple function worksum , which takes a function F , an interval [a, b] and a number n , and returns an n -subinterval approximation to the work done by the force F in moving an object from a to b (i.e. translate the formula given in Question 1 into Maple syntax).

> worksum := (F,a,b,n)-> sum(F(a + k*(b-a)/n)*(b-a)/n, k=1..n) ;

worksum := proc (F, a, b, n) options operator, arro...

Example 1: Riemann Sum approach

The force felt by an object of mass m at the surface of the Earth is -mg , where g = 9.82 m/s^2 is the 'accelerationn due to gravity'. Of course, the force felt by the object lessens as it moves away from the Earth. In fact, the correct force law is given by Newton's Law of Gravitation:

F = -GMm/(r^2) .

Here, F is the force felt by the object, m is its mass, M is the mass of the Earth, r is the distance of the object from the centre of the Earth, and G is a universal constant. The values of M and G are known, but we will not need them, because of the following argument.

(a). The kilometre was originally defined as 1/10000 of the distance from the North Pole to the Equator along the meridian which runs through Paris. Hence the circumference of the Earth is almost exactly 40000 kilometres. Find the radius of the Earth and assign it to the variable R.

> R := evalf(40000/(2*Pi));

R := 6366.197722

(b). At the surface of the Earth, r = R . Putting r = R in Newton's Law of Gravitation gives one expression for the gravitational force at the surface of the Earth. Equate this expression to -mg , and hence find the value of the product GM . (Be careful with units: g is expressed in terms of metres/second^2, but other distances are in kilometres.)

Solution.

It is best to start here with pencil and paper. Equating the two expressions for the force at the surface of the Earth gives

-GMm/(R^2) = -mg . Cancelling -m and solving for the product GM gives GM = R^2*g . We will use the value of R computed above, and the value of g given in the question, but to make the units consistent we will express g in km/s^2:

> g := 0.00982;

g := .982e-2

> GM := R^2 * g;

GM := 397989.6092

(c) At a height of 42377 kilometres above the centre of the Earth, a satellite revolves in a geostationary orbit: it takes exactly 24 hours to revolve once around the Earth, and so it is always directly above the same point on the Earth. Communications satellites, for example, are always placed in geostationary orbits. Use your Maple function from Question 2 to compute approximations to the amount of work that must be done to raise a 250-kilogram satellite from the surface of the Earth to a geostationary orbit. Use approximations with 100 and 1000 subintervals. Your function may return a negative value, although it clearly takes a positive amount of work to raise a satellite into orbit. Explain this.

Solution. We have to raise the satellite from the surface of the Earth to geostationary orbit. Since heights are being measured from the centre of the Earth, we must raise the satellite from a height R to a height of 42377 kilometres.

We want the work done against the force of gravity in moving between these heights. Our function worksum will give us (approximations to) the work done by the force. First, of course, we have to tell it what the force is:

> f := r->-GM*250/r^2 ;

f := proc (r) options operator, arrow; -250*GM/(r^2...

> worksum(f,R,42377,100);

-12857.34932

> worksum(f,R,42377,1000);

-13237.98234

Remember that this is the work done by the force, which is the negative of the work that has to be done in lifting the satellite into orbit. (The gravitational force will do a positive amount of work when the satellite crashes back to Earth.)

We should probably only keep 3 significant figures in our answers, since the value of g was only given to this accuracy. Let's say, then, that with 1000 subintervals we estimate the necessary amount of work to be 13200 Newton-kilometres,

or (in more usual units) 13200000 Newton-metres.

We've seen that the expression sum(F(a+k*(b-a)/n),k = 1 .. n) (b-a)/n is an approximation to the work done. On physical grounds, we would expect that this approximation would get better and better as n gets larger. Mathematically, on the other hand, we recognise that our approximation is a Riemann sum for the integral int(F(x),x = a .. b) , and we know that the Riemann sums will converge to this integral as proc (n) options operator, arrow; infinity end proc... . It seems reasonable to couclude, therefore, that the integral gives the exact amount of work done by the force.

Example 2: Exact Integration Approach

Use an appropriate integral to compute the exact amount of work required to lift the satellite. Compare with the Riemann sum approximations. (For example, you could ask: How good are the approximations? How many subintervals are necessary for the approximation to be within 1% of the true answer?)

Solution. (The function f should still be defined from Question 3.)

> exact_work := int(f, R..42377);

exact_work := -13281.10493

As in Question 1, this is the work done by the force, which is the negative of what we want. Rounding to 3 significant figures, let's say we have to do 13300000 Newton-metres of work to raise the satellite.

Our approximations in Question 1 were pretty good. In particular, a 1% error would mean (in Newton-kilometres) an error of no more than 132 N-km, or an approximation between

> exact_work - 132; exact_work + 132;

-13413.10493

-13149.10493

Our 1000-interval approximation certainly meets this requirement, but the 100-interval one does not. How many intervals do we need? (Some trial and error was necessary to get the number of intervals in the next commands.)

> worksum(f,R,42377,350);

-13158.33822

> worksum(f,R,42377,300);

-13138.00891

Somewhere between 300 and 350 intervals would be sufficient---you can experiment further if you want to narrow the number down more accurately.

Question: In this question, it was easy to see how accurate our approximations were, because we could compare them with the exact answer. Of course, this also makes the comparison unnecessary: if we have the exact answer, we don't need to worry about approximations! Riemann sum approximations are most useful when we can't work out the exact answer. In that situation, how do you think we could have confidence that our approximations were sufficiently accurate?