Example 9.4-1 Prediction of the Thermal Conductivity of a Liquid
> restart;
> rho:=1.595*g/cm^3;
> Icomp:=90.7e-6/atm;
> dpdr:=1/rho/Icomp;
> atm:=1.01325e5*N/m^2;N:=1e5*g*cm/s^2;cm:=m/100;dpdr;
> vs:=simplify(sqrt(dpdr),assume=positive);
Molecular Weight= 153.823 Name: Carbon Tetrachloride <--from fwt
> MW:=153.82*g/mol;Vtil:=MW/rho;
> Nav:=6.023e23/mol;Kappa:=1.38066e-23*J/K;
> k:=2.8*(Nav/Vtil)^(2/3)*Kappa*vs;
> k:=simplify(%,assume=positive);
> J:=W*s;k;