[CHM 371] Problem 3 on the Error Propagation Exercises

[Andrew J. Pounds]

  Alright -- some of you were asking me yesterday how to "substitute" 
items into your equations so they could be evaluated in Mathematica.  
Here is what I did for equation 1 on your handout...

This makes the "multivariable equation"...

Cvib[v1_, v2_, v3_, R_, h_, kb_, T_] :=
  R*( (h v1/(kb T))^2 Exp[
        h v1/(kb T)] / (Exp[h v1/(kb T)] - 1)^2 + (h v2/(kb T))^2 Exp[
        h v2/(kb T)] / (Exp[h v2/(kb T)] - 1)^2  + (h v3/(kb T))^2 Exp[
        h v3/(kb T)] / (Exp[h v3/(kb T)] - 1)^2 )

This takes the partial derivative of the equation with respect to 
frequency 1 and then substitutes in all the values.

D[Cvib[v1, v2, v3, R, h, kb, T], v1] /. {v1 -> 4.78*10^13,
   h -> 6.626*10^-34, kb -> 1.38*10^-23, T -> 500, R -> 8.314}


Let me know what questions you have.

-- 
Andrew J. Pounds, Ph.D.  (pounds at theochem.mercer.edu)
Associate Professor of Chemistry and Computer Science
Mercer University,  Macon, GA 31207   (478) 301-5627