| 查看: 3257 | 回复: 15 | ||||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||||
lwzhao1990木虫 (小有名气)
|
[交流]
【求助】冷凝的UDF程序 已有7人参与
|
|||
哪位仁兄有冷凝的UDF程序？上传一下，谢谢了！ |
回复此楼» 收录本帖的淘帖专辑推荐
 多相流UDF |
» 猜你喜欢
化学工程085602 305分求调剂
已经有10人回复
-
289求调剂
已经有15人回复
-
291 求调剂
已经有7人回复
-
274求调剂
已经有14人回复
-
北京林业大学硕导招生广告
已经有3人回复
-
309求调剂
已经有5人回复
-
292求调剂
已经有8人回复
-
求调剂
已经有4人回复
-
一志愿 西北大学 总分282 英语一62 求调剂
已经有3人回复
-
调剂310
已经有4人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- UDF并行编译求助-附程序段
已经有3人回复
- 动网格的UDF问题
已经有21人回复
- 用UDF编写化学反应热作为源项
已经有12人回复
- 关于水蒸发udf
已经有19人回复
- FLUENT中编写UDF时指针变量是否要初始化
已经有4人回复
- Fluent中UDF的编译问题
已经有25人回复
- 关于水的蒸发现象的系列实验设计
已经有21人回复
- 求助udf的输入输出
已经有16人回复
- 利用DEFINE_EXCHANGE_PROPERTY编的蒸发和冷凝的udf，大侠们帮我看看对不对
已经有9人回复
- 能量方程源项udf
已经有4人回复
- 【请教】如何控制蒸发速率和过饱和度？
已经有9人回复
千古龙飞地
木虫 (正式写手)
- 应助: 3 (幼儿园)
- 金币: 4481.2
- 散金: 200
- 红花: 2
- 帖子: 343
- 在线: 148.5小时
- 虫号: 928610
- 注册: 2009-12-15
- 专业: 细胞生物学
10楼2010-05-10 20:04:51
tacaro
至尊木虫 (知名作家)
小木虫大能猫骑士勋章
- 仿真EPI: 1
- 应助: 21 (小学生)
- 贵宾: 0.06
- 金币: 33667.5
- 散金: 1128
- 红花: 17
- 沙发: 2
- 帖子: 6306
- 在线: 1292.2小时
- 虫号: 663213
- 注册: 2008-11-27
- 专业: 武术理论与方法
★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
nono2009(金币+3,VIP+0):今天表现不错！ 10-29 12:01
小木虫(金币+0.5):给个红包，谢谢回帖交流
nono2009(金币+3,VIP+0):今天表现不错！ 10-29 12:01
|
给你一份网上流传比较多的计算冷凝蒸发的udf #include "udf.h" #include "sg_mphase.h" #define T_SAT 373 #define LAT_HT 1.e3 DEFINE_SOURCE(liq_src, cell, pri_th, dS, eqn) { Thread *mix_th, *sec_th; real m_dot_l; mix_th = THREAD_SUPER_THREAD(pri_th); sec_th = THREAD_SUB_THREAD(mix_th, 1); if(C_T(cell, mix_th)>=T_SAT){ m_dot_l = -0.1*C_VOF(cell, pri_th)*C_R(cell, pri_th)* fabs(C_T(cell, pri_th) - T_SAT)/T_SAT; dS[eqn] = -0.1*C_R(cell, pri_th)* fabs(C_T(cell, pri_th) - T_SAT)/T_SAT; } else { m_dot_l = 0.1*C_VOF(cell, sec_th)*C_R(cell, sec_th)* fabs(T_SAT-C_T(cell,mix_th))/T_SAT; dS[eqn] = 0.; } return m_dot_l; } DEFINE_SOURCE(vap_src, cell, sec_th, dS, eqn) { Thread * mix_th, *pri_th; real m_dot_v; mix_th = THREAD_SUPER_THREAD(sec_th); pri_th = THREAD_SUB_THREAD(mix_th, 0); if(C_T(cell, mix_th)>=T_SAT){ m_dot_v = 0.1*C_VOF(cell, pri_th)*C_R(cell, pri_th)* fabs(C_T(cell, mix_th) - T_SAT)/T_SAT; dS[eqn] = 0.; } else { m_dot_v = -0.1*C_VOF(cell, sec_th)*C_R(cell, sec_th)* fabs(T_SAT-C_T(cell,mix_th))/T_SAT; dS[eqn] = -0.1*C_R(cell, sec_th)* fabs(C_T(cell, sec_th) - T_SAT)/T_SAT; } return m_dot_v; } DEFINE_SOURCE(enrg_src, cell, mix_th, dS, eqn) { Thread *pri_th, *sec_th; real m_dot; pri_th = THREAD_SUB_THREAD(mix_th, 0); sec_th = THREAD_SUB_THREAD(mix_th, 1); if(C_T(cell, mix_th)>=T_SAT){ m_dot = -0.1*C_VOF(cell, pri_th)*C_R(cell, pri_th)* fabs(C_T(cell, pri_th) - T_SAT)/T_SAT; dS[eqn] = -0.1*C_VOF(cell, pri_th)*C_R(cell, pri_th)/T_SAT; } else { m_dot = 0.1*C_VOF(cell, sec_th)*C_R(cell, sec_th)* fabs(T_SAT-C_T(cell,mix_th))/T_SAT; dS[eqn] = -0.1*C_VOF(cell, sec_th)*C_R(cell, sec_th)/T_SAT;} return LAT_HT*m_dot; } 希望能有点启发  |
2楼2009-10-29 11:53:19
lwzhao1990
木虫 (小有名气)
- 应助: 5 (幼儿园)
- 金币: 2057.2
- 散金: 610
- 红花: 3
- 帖子: 146
- 在线: 31.1小时
- 虫号: 660539
- 注册: 2008-11-23
- 性别: GG
- 专业: 工程热物理相关交叉领域
3楼2009-10-29 13:13:39
tacaro
至尊木虫 (知名作家)
小木虫大能猫骑士勋章
- 仿真EPI: 1
- 应助: 21 (小学生)
- 贵宾: 0.06
- 金币: 33667.5
- 散金: 1128
- 红花: 17
- 沙发: 2
- 帖子: 6306
- 在线: 1292.2小时
- 虫号: 663213
- 注册: 2008-11-27
- 专业: 武术理论与方法
4楼2009-10-29 13:16:03
40