Question: Problem with subs command

I know this is a trivial worksheet (in document mode) but why does the second subs fail? Thanks  Gravity.mw
 

``

Justification for using mg as the force exerted by mass m in gravity field g

Using Newton's Law of Gravity, find ``

work := `assuming`([int(G*M*m/r^2, r = R .. R+h)], [0 < R, 0 < h])

G*M*m*h/(R*(R+h))

(1)

``

R is >> h, so let R + h = R

work := subs(R+h = R, work)

G*M*m*h/R^2

(2)

``

G, M and R are all constants, so let GM/R² = g

work := subs(G*M/R^2 = g, work)

G*M*m*h/R^2

(3)

``

``


 

Download Gravity.mw

 

Please Wait...