24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1660  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 食品工程专硕一志愿中海洋309求调剂 +5 小张zxy张 2026-03-26 10/500 2026-03-31 00:29 by jp9609
[考研] 材料与化工调剂一志愿大连海事085600,349 +5 吃的不少 2026-03-30 5/250 2026-03-30 23:31 by 果果妈咪
[考研] 求调剂,一志愿 南京航空航天大学 ,080500材料科学与工程学硕,总分289分 +9 @taotao 2026-03-29 9/450 2026-03-30 22:29 by 我是小康
[考研] 一志愿南昌大学324求调剂 +9 hanamiko 2026-03-27 9/450 2026-03-30 20:10 by 无际的草原
[考研] 332求调剂 +14 032500 2026-03-25 14/700 2026-03-30 20:03 by 无际的草原
[考研] 346求调剂 一志愿070303有机化学 +7 萝卜炖青菜 2026-03-28 8/400 2026-03-30 19:59 by 无际的草原
[考研] 各位老师好,我的一志愿为北京科技大学085601材料专硕 +10 Koxui 2026-03-28 10/500 2026-03-30 19:33 by 源_2020
[考研] 抱歉 +3 田洪有 2026-03-30 3/150 2026-03-30 19:11 by 迷糊CCPs
[考研] 071010 323 分求调剂 +3 Baekzhy 2026-03-27 3/150 2026-03-30 14:24 by andresqi
[考研] 环境科学与工程334分求调剂 +6 王一一依依 2026-03-30 8/400 2026-03-30 11:52 by yjolah
[考研] 材料与化工272求调剂 +21 阿斯蒂芬2004 2026-03-28 21/1050 2026-03-30 10:52 by 晴空210210
[考研] 317求调剂 +10 蛋黄咸肉粽 2026-03-26 10/500 2026-03-30 09:45 by longlotian
[考研] 一志愿211,335分,0856,求调剂院校和导师 +7 倾____萧 2026-03-27 8/400 2026-03-30 09:37 by longlotian
[考研] 总分293求调剂 +8 加一一九 2026-03-25 11/550 2026-03-29 19:53 by 无际的草原
[考研] 330分求调剂 +5 qzenlc 2026-03-29 5/250 2026-03-29 07:37 by 无际的草原
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 086502化学工程342求调剂 +6 阿姨复古不过 2026-03-27 6/300 2026-03-28 07:06 by wangy0907
[考研] 305求调剂 +5 哇卢卡库 2026-03-26 5/250 2026-03-27 14:01 by laoshidan
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 351求调剂 +4 麦克阿磊 2026-03-24 4/200 2026-03-27 00:32 by wxiongid
信息提示
请填处理意见