C Program to find out Reynold Number, Prandtl No., Heat Transfer Coefficients, Catalyst Surface temperature

C Program to find out Reynold Number, Prandtl No., Heat Transfer Coefficients, Catalyst Surface temperature

#include

#include

#include

#include

main ()

{

float nrc, dp = 0.015, go = 3500 , eps = 0.46, muo= 0.3 * 3.6, pr,cp=3.2*4.183, k=0.33, nu,ras=0.05,dhr=40000*4.183, h,tcat,tf=800,t;

clrscr ();

nrc= ((dp*go*eps)/(eps*(1-eps)))/muo;

pr= cp*muo/k/1000;

nu= ((0.5* exp(0.5 * log(nrc)))+(0.2* exp(0.67*log(nrc))))*exp((1/3)*log(pr));

h= (nu*k/dp)*0.54/0.46;

tcat= tf-(ras*dhr/h);

t=tcat-273;

printf("\n\n\t catalyst surface temperature summary:");

/*printf("\n\t catalyst surface temperature summary \n"); */

printf("\n\n\t reynolds number = %6.2f",nrc);

printf("\n\n\t prandtl number = %8.6f",pr);

printf("\n\n\t nusselt number = %4.2f",nu);

printf("\n\n\t heat transfer coefficient= %6.2f w/k.sq meter",h);

printf("\n\n\t catalyst surface temperature = %6.2f deg.k",tcat);

printf("\n\n\t catalyst surface temperature = %6.2f deg.c",t);

getch();

return(t);

}