- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第1章 化工物性数据和平衡数据_精品
* 二元系 * 1.3.3 逸度系数的计算 * 均相性质计算。组分逸度系数和组分逸度属于敞开体系的性质,而总逸度系数、总逸度、偏离焓、偏离熵是属于封闭体系的性质 二元均相混合物,封闭体系自由度是2(给定T,P);敞开体系自由度是3,(给定T,P,组成) 1.3.3 逸度系数的计算 * 1.3.3 逸度系数的计算 * 1.3.4 利用实验数据 二元气液平衡数据类型 恒温数据 恒压数据 在计算机上运行时,列表数据通常要进行插值计算,并编制成子程序在计算中被调用。 多元的气液平衡需要通过实验数据关联相关的参数,如应用二元平衡数据关联Wilson方程的aij值,再用于其他多元物系的计算。 * 1.4 液液平衡数据 1.4.1 液液相平衡关系 1.4.2 实验数据利用 组分A在萃取相和萃余项分配关系方程 萃取相中A和S组分关系方程 萃余相中A和S组分关系方程 采用插值的方式或函数拟合。 * 1.5 实验数据的拟合 化工实验和工程实践中,可测得许多离散的实验数据和工业数据,通常需要寻找一条连续光滑曲线 来近似反映已知数据组间存在的某种关系的一般趋势,所得近似函数 可以很好地逼近离散数据( ),这个函数逼近的过程称为曲线拟合或经验建模。 常用最小二乘法曲线拟合。 * * * * * * 1.2.1 数据型数据子程序 这类数据库相对比较简单,只要知道物质的名称就可以查询所需的物性数据。如需知道某物质在常压下的沸点、熔点、临界参数等数据,对数据库只需一个查询系统,无需计算。 表1-1 苯、甲苯、乙苯等物性数据 序号 MW TF TB TC Pc Vc Zc Ω 物质 g·mol-1 K K K 102 kPa cm3·mol-1 1 benzene 78.114 278.68 353.24 562.16 48.98 258.9 0.271 0.211 2 toluene 92.141 178.18 383.78 591.79 41.09 315.8 0.264 0.264 3 ethylbenzene 106.17 178.20 409.35 617.17 36.09 373.8 0.263 0.304 4 m-xylene 106.17 225.30 412.58 617.05 35.41 375.8 0.259 0.326 5 o-xylene 106.17 247.98 417.58 630.37 37.34 369.2 0.263 0.313 6 p-xylene 106.17 286.41 411.51 616.26 35.11 379.1 0.260 0.326 * C语言程序:调用临界参数 #include stdio.h #include string.h float arene(char *m, char *n){ #define Nh 8 #define Nl 6 FILE *in; char str0[80], str1[80]; int i,j,i1,j1,cmp; static int pd=0; static char property[Nh][80]; static char substance[Nl][80]; static float critical[Nl][Nh]; if (pd==0){ in=fopen(critical.txt,rt); fscanf(in,%s,str0); fscanf(in,%s,str1); for (i=0;iNh;i++) {fscanf(in,%s,property[i]);} for (j=0;jNl;j++) {fscanf(in,%s,substance[j]); for (i=0;iNh;i++) fscanf(in,%f,critical[j][i]);} fclose(in); pd=-1; } i1=-1; for(i=0;iNh;i++) {cmp=strcmp(n,property[i]); if(cmp==0) i1=i;} if(i1==-1) printf(\%s\not exist!\n,n); j1=-1; for(j=0;jNl;j++) {cmp=strcmp(m,substance[j]); if(cmp==0) j1=j;} if(j1==-1) printf(\%s\not exist!\n,m); if ((i1==-1)||(j1==-1)) return-99999.9; else
文档评论(0)