24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1663  |  回复: 3

wzwyl2010

新虫 (初入文坛)

[求助] UDF并行编译求助-附程序段

单核编译UDF成功计算 为了提高计算速度现在对udf并行编译 由于程序段较多,涉及宏 DEFINE_ADJUST 、DEFINE_SOURCE 、DEFINE_PROFILE、DEFINE_DIFFUSIVITY、Message以及sum求和等并行编译起来比较麻烦。Help里有介绍并行编译时,如果涉及HOST和NODE之间的数据交换以及在求和时候,在程序段加一些并行宏如#if !RP_HOST、#if !RP_NODE、node_to_host_real_2等,不知道怎么定义是否有数据交换,即添加宏的原则,如下段程序是否存在数据交换,需要怎样添加,谢谢大牛们!!!

DEFINE_ADJUST(mem,domain)
{
Domain*d;
cell_t c;  
Thread*t;   
int MEM=46;
real sum_rmem=0.00;
real rmem;
int i=0;

t=Lookup_Thread(domain,MEM);
begin_c_loop(c,t)
{
  
   sum_rmem+=(1.0/(0.5139*C_UDSI(c,t,W_CONT)-0.326)*exp(1268.0*(1.0/303.0-1.0/C_T(c,t)))*0.000025);
   i+=1;
   C_UDMI(c,t,RMEM)=sum_rmem;
}
end_c_loop(c,t)
rmem=sum_rmem/i;
Message("avg_reme= %lf.\n",rmem);


DEFINE_PROFILE(porosity_profile,t,i)   
{
    cell_t c;
    real xc[ND_ND];
    real poro;                  
    real y;                  
    real per;
        real poro_eff;
    begin_c_loop(c,t)
    {
      C_CENTROID(xc,c,t);
      y=xc[0];

      if((y>0.0010&&y<=0.0013)||(y>0.001345&&y<=0.001645))      
       {
        poro=PORO_GDL;  /*扩散层的孔隙率*/
                per=PER_GDL ;/*扩散层的渗透率*/
       }
      else if((y>0.0013&&y<=0.00131)||(y>0.001335&&y<=0.001345))
       {
        poro=PORO_CATA;
                per=PER_CATA;
     
      }
          else if( y>0.00131&&y<=0.001335)
          {
          poro=PORO_M;
          per=1.0E-18;
          
          }
          else
          {
          poro=0.999;
          per=8.0E-7;
          
          }

          C_UDMI(c,t,PORO)=poro;
      C_UDMI(c,t,PER)=per;
            poro_eff=poro*(1-C_UDSI(c,t,DS));
      C_UDMI(c,t,PORO_EFF)=poro_eff;
      C_PROFILE(c,t,i)=C_UDMI(c,t,PORO_EFF);
        }end_c_loop(c,t)
         
}

DEFINE_SOURCE(uds_source,c,t,dS,eqn)
{   
       
        real source;
          source=C_UDMI(c,t,S_VL)*MOL_WEI_LIQ;
        dS[eqn]=0.;
        return source;

}
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gearboy78

禁虫 (小有名气)

本帖内容被屏蔽

2楼2013-11-14 14:04:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wzwyl2010

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by gearboy78 at 2013-11-14 14:04:37
自己看一下fluent里面并行的模型,计算变量在每个node上都会有一份的,如果是求和sum,那么每个node上的sum得到的只是该node上的求和值,要整体求和还要再调用PRF函数。总之,关键是多看看udf帮助中的并行介绍。

额 对一些概念不是太明白,NODE上有计算变量,这个计算变量在并行计算时候是在分块网格上各自计算,要把这些NODE上的变量都加起来好像需要#if !RP_host,看到论坛上说,单核改并行编译在每句上都加#if !RP_host,不知道这样可以不 感觉这样加很笼统,有些地方可能不需要加,对于我这个程序怎么并行编译分析呢
3楼2013-11-14 15:38:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gearboy78

禁虫 (小有名气)

本帖内容被屏蔽

4楼2013-11-15 10:29:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 学员m2M02a 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿华东理工大学,080500学硕,317分,求调剂 +8 s1145 2026-03-31 8/400 2026-03-31 17:37 by 唐沐儿
[考研] 288求调剂 一志愿哈工大 材料与化工 +11 洛神哥哥 2026-03-31 11/550 2026-03-31 16:47 by yanflower7133
[考研] 一志愿085600中科院宁波所276分求调剂 +12 材料学257求调剂 2026-03-28 13/650 2026-03-31 14:30 by 六翼TMR
[考研] 270求调剂 +3 小杰pp 2026-03-31 4/200 2026-03-31 12:59 by wxiongid
[考研] 269求调剂 +4 我想读研11 2026-03-31 4/200 2026-03-31 10:04 by cal0306
[考研] 一志愿食品科学与工程083200求调剂 +4 XQTJZ 2026-03-30 4/200 2026-03-31 04:10 by fmesaito
[考研] 083000环境科学与工程调剂,总分281 +4 橙子(胜意) 2026-03-30 4/200 2026-03-31 00:44 by Linzejun
[考研] 本科211总分289,08工学真心求调剂 +3 utopiaE 2026-03-30 3/150 2026-03-30 23:42 by ms629
[考研] 297求调剂 +17 田洪有 2026-03-26 18/900 2026-03-30 18:32 by nothing投稿中
[考研] 一志愿厦门大学材料工程专硕354找调剂!!! +5 贝呗钡钡 2026-03-30 5/250 2026-03-30 18:16 by 无际的草原
[考研] 334分 一志愿武理 材料求调剂 +16 李李不服输 2026-03-26 16/800 2026-03-30 17:47 by wangjy2002
[考研] 085600,专业课化工原理,321分求调剂 +5 大馋小子 2026-03-28 5/250 2026-03-29 08:56 by qingfeng258
[考研] 316求调剂 +7 江辞666 2026-03-26 7/350 2026-03-28 21:28 by sanrepian
[考研] 0856,材料与化工321分求调剂 +12 大馋小子 2026-03-27 13/650 2026-03-28 10:56 by self2008
[考研] 331环境科学与工程求调剂 +3 熠然好运气 2026-03-27 3/150 2026-03-28 04:11 by fmesaito
[考研] 272求调剂 +7 脚滑的守法公民 2026-03-27 7/350 2026-03-27 17:23 by laoshidan
[考研] 打过很多竞赛,085406控制工程300分,求调剂 +3 askeladz 2026-03-26 3/150 2026-03-26 09:08 by 给你你注意休息
[考研] 347求调剂 +4 L when 2026-03-25 4/200 2026-03-25 13:37 by cocolv
[考研] 求调剂 +3 李李不服输 2026-03-25 3/150 2026-03-25 13:03 by cmz0325
[考研] 一志愿吉林大学材料与化工303分求调剂 +4 为学666 2026-03-24 4/200 2026-03-25 11:27 by BruceLiu320
信息提示
请填处理意见