24小时热门版块排行榜    

查看: 1177  |  回复: 4

jiangge2585

铜虫 (小有名气)

[求助] udf 热源 初始化

求大神帮我看看我的程序哪里出问题了?这是一个激光高斯面热源程序,我的意图是:激光脉宽0.008s,频率是10Hz,就是1秒激光打10次,每次持续0.008s。但是
模拟的结果却是不能初始化,初始化时就卡主了,一直停在那。求大神救我!
这是程序:
DEFINE_PROFILE(heat_flux,t,i)
{
  real xx[ND_ND];
  real y,x,r,a,time_step;
  int n;
  face_t f;
  begin_f_loop(f,t)
  {
    F_CENTROID(xx,f,t);
    y=xx[1];
    x=xx[0];
    r=0.001;
    a=0;
    n=0;
    if(a<=1)
    {
      if(a>=0.108*n&&a<=0.108*n+0.08)
      {
        if(sqrt(x*x+y*y)<=0.001)
        {
          F_PROFILE(f,t,i)=1160*0.7/(3.1415926*r*r)*exp(-(x*x+y*y)/(r*r));
        }
        else
        {
          F_PROFILE(f,t,i)=0;
        }
      RP_Get_Real("flow-time";
      a=RP_Get_Real("flow-time";
      n=(int)a/0.108;
      }
      else
      {
        F_PROFILE(f,t,i)=0;
      }
    }
    else
    {
      Error("error reading file";
    }
  }
  end_f_loop(f,t)
}
回复此楼

» 猜你喜欢

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

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

jiangge2585

铜虫 (小有名气)

这些天想了想,好像是begin_f_loop(f,t)
和循环程序冲突了,所以才会卡主,begin_f_loop(f,t)
扫描出一个面网格中心P,然后把符合(sqrt(x*x+y*y)<=0.001)
的P丢进循环语句执行,执行过一次之后,a和n的值就已经超出了循环条件所规定的范围,不能再进行循环了。
我就改了一下,但下面这个程序却没有发热,不知道哪有问题了?求大神救我!
#include "udf.h"
DEFINE_PROFILE(heat_flux,t,i)
{
  real xx[ND_ND];
  real y,x,r,a;
  int n;
  face_t f;
  begin_f_loop(f,t)
  {
    F_CENTROID(xx,f,t);
    y=xx[1];
    x=xx[0];
    r=0.001;
     if(sqrt(x*x+y*y)<=0.001)
      for(a=n=0;a>=0.1*n&&a<=0.1*n+0.008&&a<=1;n=(int)a/0.1)
      {
        F_PROFILE(f,t,i)=1160*0.7/(3.1415926*r*r)*exp(-(x*x+y*y)/(r*r));
        a=RP_Get_Real("flow-time";
      }
  }
  end_f_loop(f,t)
}
2楼2013-06-25 15:14:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

CFD项目承接

新虫 (初入文坛)

本帖内容被屏蔽

3楼2013-06-25 15:24:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

CFD项目承接

新虫 (初入文坛)


1592203609: 金币+1, 谢谢回帖,建议给出更为详细的答案 2013-06-25 17:58:02
本帖内容被屏蔽

4楼2013-06-25 15:27:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

perfectgem

新虫 (小有名气)

引用回帖:
2楼: Originally posted by jiangge2585 at 2013-06-25 15:14:35
这些天想了想,好像是begin_f_loop(f,t)
和循环程序冲突了,所以才会卡主,begin_f_loop(f,t)
扫描出一个面网格中心P,然后把符合(sqrt(x*x+y*y)<=0.001)
的P丢进循环语句执行,执行过一次之后,a和n的值就已经 ...

我只看出了一点就是,你用 F_CENTROID(xx,f,t),,是将网格质点中心给了xx值,,就是已经确定具体的位置了,,然后后面 a=RP_Get_Real("flow-time"。。这个的含义是获得流动时间,就是要移动,位置会发生改变,,,这两个好像同时用,会冲突吧?
5楼2014-01-06 15:49:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jiangge2585 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 300分,材料,求调剂,英一数二 +5 超赞的 2026-03-24 5/250 2026-03-24 21:07 by 星空星月
[考研] 求调剂,一志愿:南京航空航天大学大学 ,080500材料科学与工程学硕,总分289分 +5 @taotao 2026-03-19 5/250 2026-03-24 21:07 by greychen00
[考研] 086003食品工程求调剂 +5 淼淼111 2026-03-24 5/250 2026-03-24 20:53 by lailaisimei
[考研] 0854人工智能方向招收调剂 +3 章小鱼567 2026-03-24 3/150 2026-03-24 19:46 by zhouxuan..
[考研] 一志愿山东大学药学学硕求调剂 +3 开开心心没烦恼 2026-03-23 4/200 2026-03-24 00:06 by 开开心心没烦恼
[考研] 一志愿北京化工大学 070300 学硕 336分 求调剂 +7 vv迷 2026-03-22 7/350 2026-03-23 23:44 by Txy@872106
[考研] 306求调剂 +9 chuanzhu川烛 2026-03-18 9/450 2026-03-23 13:17 by luoyongfeng
[考研] 263求调剂 +6 yqdszhdap- 2026-03-22 9/450 2026-03-23 12:57 by yqdszhdap-
[考研] 材料与化工085600,总分304,本科有两篇sci参与,求调剂 +4 幸运的酱酱 2026-03-22 5/250 2026-03-22 20:15 by edmund7
[考研] 298求调剂一志愿211 +3 上岸6666@ 2026-03-20 3/150 2026-03-22 15:50 by ColorlessPI
[考研] 260求调剂 +3 朱芷琳 2026-03-20 4/200 2026-03-22 15:12 by 朱芷琳
[考研] 求调剂 +7 Auroracx 2026-03-22 7/350 2026-03-22 12:38 by 素颜倾城1988
[考研] 一志愿深大,0703化学,总分302,求调剂 +4 七月-七七 2026-03-21 4/200 2026-03-21 18:20 by 学员8dgXkO
[考研] 22 350 本科985求调剂,求老登收留 +3 李轶男003 2026-03-20 3/150 2026-03-21 13:28 by 搏击518
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +3 晨昏线与星海 2026-03-18 3/150 2026-03-21 00:46 by JourneyLucky
[考研] 22408 344分 求调剂 一志愿 华电计算机技术 +4 solanXXX 2026-03-20 4/200 2026-03-20 23:49 by alg094825
[考研] 304求调剂 +7 司空. 2026-03-18 7/350 2026-03-20 23:08 by JourneyLucky
[考研] 考研调剂求学校推荐 +3 伯乐29 2026-03-18 5/250 2026-03-20 22:59 by JourneyLucky
[考研] 一志愿 南京航空航天大学大学 ,080500材料科学与工程学硕 +5 @taotao 2026-03-20 5/250 2026-03-20 20:16 by JourneyLucky
[考研] 招收调剂硕士 +4 lidianxing 2026-03-19 12/600 2026-03-20 12:25 by lidianxing
信息提示
请填处理意见