C Program to find out Distillation Column height and diameter

#include

#include

#include

#include

#include

main ()

{

int flt=295,nths=11,patm=1;

float f = 9000, xf = 0.44, xd= 0.974 , xb= 0.023 , fmmwt = 86.4, lamb=7165 , cp=0.44 , dt , q , fbpt = 370.4, r , c,vfrfr, vfriss=2.48,naplt,plte=0.5,ch,chfps=0.45,d,v,vr,rgc=0.082,tbppb=353.3, atop,vvel=0.6,dtop,famt,pai=(22/7),vfrv,tbppt=383.6,abotm,dbotm,dia;

clrscr ();

famt=f/fmmwt;

dt= fbpt-flt;

q= (cp*fmmwt*dt+lamb)/lamb;

r= q/(q-1);

vfrfr= vfriss*famt;

naplt= (nths-1)/plte;

ch=((naplt-1)*chfps)+(2*chfps);

d= famt*(xf-xb)/(xd-xb);

v= d*(r+1);

vr= v*rgc*tbppb/patm;

atop= vr/(3600*vvel);

dtop= sqrt(atop*4/pai);

vfrv= vfrfr*rgc*tbppt/patm;

abotm= vfrv/(3600*vvel);

dbotm= sqrt(abotm*4/pai);

dia= dbotm;

printf("\n\n\t distillation column design summary:");

printf("\n\n\t column height=%4.2fmeter",ch );

printf("\n\n\t column diameter =%4.2f meter",dia );

printf("\n\n\t column diameter at the top= %5.2f meter",dtop);

printf("\n\n\t column c.s.area= %5.3f square meter",abotm);

getch();

return(dia);

}