xxxx18一60岁hd中国/日韩女同互慰一区二区/西西人体扒开双腿无遮挡/日韩欧美黄色一级片 - 色护士精品影院www

  • 大小: 5KB
    文件類(lèi)型: .zip
    金幣: 1
    下載: 0 次
    發(fā)布日期: 2021-01-02
  • 語(yǔ)言: 其他
  • 標(biāo)簽: 相平衡??

資源簡(jiǎn)介

計(jì)算流體相平衡,僅供大家參考,共同學(xué)習(xí),共同進(jìn)步。

資源截圖

代碼片段和文件信息

#include
#include
#include
#include?
double?antoine(double); //運(yùn)用Antoine?Equation方程計(jì)算
double?yidu(doubledoubledouble);//運(yùn)用PR方程計(jì)算逸度
double?deltayidu(doubledouble);//計(jì)算氣相和液相逸度差
double?jiexi(int?doubledoubledouble);//運(yùn)用解析法解關(guān)于Z的三次方程

main()
{
double?tc=562.2;//苯的臨近溫度
double?*ta=NULL;//動(dòng)態(tài)創(chuàng)建三個(gè)數(shù)組,分別存儲(chǔ)溫度和飽和蒸汽壓及迭代壓力
double?*pa=NULL;
double?*pe=NULL;
double?tb;
double?t=353.35;?//起始溫度
int?count=0;
int?i;
int?j;
tb=t;
while(1)//溫度的動(dòng)態(tài)劃分
{
count=count+1;
if(tb<=tc-30)
tb=tb+5;
else
tb=tb+0.1;
if(tb>tc)
break;
}
ta=new?double[count];
pa=new?double[count];
pe=new?double[count];
ta[0]=t;
pa[0]=antoine(t);
pa[0]=pa[0]*0.001315789;
for(j=1;j<=count-1;j++)//運(yùn)用Antoine?Equation方程計(jì)算飽和蒸汽壓
{

?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----
?????文件????????4650??2020-04-27?18:28??計(jì)算流體相平衡.c

評(píng)論

共有 條評(píng)論

相關(guān)資源