| 3 | 1/1 | 返回列表 |
| 查看: 834 | 回復(fù): 2 | ||
[求助]
求大神幫忙看看這個動量源項為什么加載不上?哪錯了,
|
|
DEFINE_SOURCE(s_l_interaction_resistance_z,c,t,dS,eqn) { real source; real fs,fl,rho,rhos,rhol,u,v,w,a,b,cc; u=C_U(c,t),v=C_V(c,t),w=C_W(c,t); rhos=7200.,rhol=6900.; rho=(1-C_VOF(c,t,1))*rhos+C_VOF(c,t,1)*rhol;/*as to rho=C_R(c,t);*/ fs=rhos*(1-C_VOF(c,t,1))/rho; fl=1-fs; a=C_UDMI(c,t,5)-2.*C_VOF(c,t)*C_UDMI(c,t,5); b=C_UDMI(c,t,3)-2.*C_VOF(c,t)*C_UDMI(c,t,3); cc=C_UDMI(c,t,4)-2.*C_VOF(c,t)*C_UDMI(c,t,4); if ((C_VOF(c,t,1)>0&&C_VOF(c,t,1)<1.)&&(C_VOF(c,t,0)=0)) { if((THREAD_STORAGE(t,SV_UDS_I(10))!=NULL)&&(T_STORAGE_R_NV(t,SV_UDSI_G(10))!=NULL)) { source=-ND_DOT(C_UDSI_G(c,t,10)[0],C_UDSI_G(c,t,10)[1],C_UDSI_G(c,t,10)[2],u,v,w)-\ C_UDSI(c,t,10)*(C_DUDX(c,t)+C_DVDY(c,t)+C_DWDZ(c,t)); dS[eqn]=-(C_DUDX(c,t)+C_DVDY(c,t)+C_DWDZ(c,t))*rho*fs*fl-2*rhos*w*rhol*(rho*a-C_VOF(c,t)*(1-C_VOF(c,t))*(rhol-rhos)*C_UDMI(c,t,5))/(rho*rho)-\ rhos*rhol*C_VOF(c,t)*(1-C_VOF(c,t))*C_W_G(c,t)[2]/rho-rhos*rhol*C_VOF(c,t)*(1-C_VOF(c,t))*C_W_G(c,t)[0]/rho-\ rhos*u*rhol*(rho*b-C_VOF(c,t)*(1-C_VOF(c,t))*(rhol-rhos)*C_UDMI(c,t,3))/(rho*rho)-rhos*rhol*C_VOF(c,t)*(1-C_VOF(c,t))*C_W_G(c,t)[1]/rho-\ rhos*v*rhol*(rho*cc-C_VOF(c,t)*(1-C_VOF(c,t))*(rhol-rhos)*C_UDMI(c,t,4))/(rho*rho); return source; } } } |
新蟲 (小有名氣)

新蟲 (正式寫手)
| 3 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 一志愿廈門大學(xué)材料工程專碩354找調(diào)劑。。 +5 | 貝唄鋇鋇 2026-03-30 | 5/250 |
|
|---|---|---|---|---|
|
[考研] 307求調(diào)劑 +16 | 超級伊昂大王 2026-03-24 | 17/850 |
|
|
[考研] 085600 295分求調(diào)劑 +4 | W55j 2026-03-30 | 6/300 |
|
|
[考研] 0703本科鄭州大學(xué)求調(diào)劑 +7 | nhj_ 2026-03-25 | 7/350 |
|
|
[考研] 0703化學(xué)/290求調(diào)劑/本科經(jīng)歷豐富/工科也可 +13 | 丹青奶蓋 2026-03-26 | 15/750 |
|
|
[考研] 285求調(diào)劑 +5 | AZMK 2026-03-29 | 8/400 |
|
|
[考研] 求調(diào)劑 +4 | QiMing7 2026-03-25 | 5/250 |
|
|
[考研] 考研調(diào)劑 +7 | 小蠟新筆 2026-03-29 | 7/350 |
|
|
[考研] 356求調(diào)劑 +4 | gysy?s?a 2026-03-28 | 4/200 |
|
|
[考研] 11408軟件工程求調(diào)劑 +3 | Qiu學(xué)ing 2026-03-28 | 3/150 |
|
|
[考研] 壓國家一區(qū)線,求導(dǎo)師收留,有恩必謝! +7 | 迷人的哈哈 2026-03-28 | 7/350 |
|
|
[材料工程] 一志愿C9材料與化工專業(yè)總分300求調(diào)劑 +8 | 曼111 2026-03-24 | 9/450 |
|
|
[有機交流]
高溫高壓反應(yīng)求助
10+4
|
chibby 2026-03-25 | 4/200 |
|
|
[考研] 285求調(diào)劑 +4 | AZMK 2026-03-27 | 7/350 |
|
|
[考研] 322求調(diào)劑 +4 | 我真的很想學(xué)習(xí) 2026-03-23 | 4/200 |
|
|
[考研] 求調(diào)劑 +3 | 劉柯@ 2026-03-24 | 4/200 |
|
|
[考研] 調(diào)劑 +3 | 李嘉圖·S·路 2026-03-27 | 3/150 |
|
|
[考研] 化學(xué)調(diào)劑一志愿上海交通大學(xué)336分-本科上海211 +4 | 小魚愛有機 2026-03-25 | 4/200 |
|
|
[考研] 309求調(diào)劑 +4 | gajsj 2026-03-25 | 5/250 |
|
|
[考研] 086003食品工程求調(diào)劑 +6 | 淼淼111 2026-03-24 | 6/300 |
|