Example 9.1-1 Measurement of Thermal Conductivity
      _____
   T0|  ^  |T1
Q--->|  |  |--->Q
     |  A  |
     |  |  |
     |__|__|
      <-Y->
>  restart;
>  k:=(Q,Y,A,T1,T0)->Q*Y/(A*(T1-T0));  Eq 9.1-1
[Maple Math]
>  kCase1:=k(3*watt,.252*inch,1*ft^2,26*C,24*C);  
[Maple Math]
>  watt:=J/sec; ft:=12*inch; inch:=2.54*cm; J:=.23901*cal; C:=K;  Converting units.
>  kCase1; The text found 2.47e-4 cal/(sec*cm*K)
[Maple Math]