Mathematics & Science Learning Center
Computer Laboratory

Applications of Differential Equations

A Suspended Wire

(continued from last page...)

Your Mathematica session should have gone something like this:

ansol1 = ansol[[1, 1, 2]]

-80. + 80. Cosh[0.0125 x]

Finally, let's make a graph of this solution on the interval -5≤ x ≤ 5. Issue the following command:

Plot[ansol1, {x, -5, 5}]

Let's now go and see what you should have gotten...

If you're lost, impatient, want an overview of this laboratory assignment, or maybe even all three, you can click on the compass button on the left to go to the table of contents for this laboratory assignment.