| 查看: 388 | 回复: 0 | |||
[交流]
自己编写了一个蒸发扩散的程序，但编译和加载后，在下拉菜单中没有发现程序
|
|
#include"udf.h" #include"math.h" #include"mem.h" #define N_HEPTANE_NUM 0// the n-hexane number in the species list DEFINE_ADJUST(species_mass_fraction,domain) { real Ma=86,Mb=28.966,A=6.8776,B=1171.530,C=224.366,Pvap,P_total;//Ma 是正己烷的分子量；Mb是空气的分子量；Pvap是正己烷的饱和蒸汽压；P_total是总压 float Z,D=133.325; face_t f; int ID=14;//泄漏面的ID Thread*thread=Lookup_Thread(domain,ID); begin_f_loop(f,thread) { Z=A-B/(F_T(f,thread)-273.15+C); Pvap=D*pow(10,Z); P_total=ABS_P(F_P(f,thread),op_pres); F_YI(f,thread,0)=Pvap*Ma/P_total/(Pvap*Ma/P_total+(1-Pvap/P_total)*Mb); } end_f_loop(f,thread) |
回复此楼» 猜你喜欢
反铁磁体中的磁性切换：两种不同的机制已成功可视化
已经有0人回复
-
求标准粉末衍射卡号 ICDD 01-076-1802
已经有0人回复
-
物理学I论文润色/翻译怎么收费?
已经有242人回复
-
新西兰Robinson研究所招收全奖PhD
已经有0人回复
-
石墨烯转移--二氧化硅衬底石墨烯
已经有0人回复
-
笼目材料中量子自旋液体基态的证据
已经有0人回复
-
数学教学论硕士可以读数学物理博士吗？
已经有0人回复
-
德国亥姆霍兹Hereon中心汉堡分部招镁合金腐蚀裂变SCC课题方向2026公派博士生
已经有4人回复
-
澳门大学 应用物理及材料工程研究院 潘晖教授课题组诚招博士后
已经有11人回复
» 本主题相关商家推荐: (我也要在这里推广)
