Example 10.7-1 Error in Thermocouple Measurement
>  restart;
>  N:=(h,L,k,B)->sqrt(h*L^2/(k*B)); eq. 10.7-8
>  inch:=ft/12.;
>  N1:=N(120*Btu/(hr*ft^2*F),0.2*ft,60*Btu/(hr*ft*F),0.08*inch);
>  Tw:=350*F;
>  Theta:=zeta->(T(zeta)-Ta)/(Tw-Ta); Eq. 10.7-6
>  eq:=Theta(1)=cosh(0)/cosh(N1); Eq. 10.7-13
>  T(1):=500*F; This is what the thermocouple reads.
[Maple Math]
>  solve(eq,Ta); This is the real air temperature.
[Maple Math]