24小时热门版块排行榜    

查看: 1377  |  回复: 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的回帖

CFD项目承接

新虫 (初入文坛)


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

4楼2013-06-25 15:27:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

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的回帖

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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +45 医学老男孩 2026-08-13 101/5050 2026-08-18 13:40 by 医学老男孩
[基金申请] 时间戳又变了8-15 +14 archvillain 2026-08-15 26/1300 2026-08-18 13:37 by phantomgost
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 KZyU1THERRVo 2026-08-18 4/200 2026-08-18 13:28 by vHWVV9D5Deb5
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +13 Ldrop2023 2026-08-13 16/800 2026-08-18 12:25 by 淀粉搬运工
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 8/400 2026-08-18 11:47 by gltch
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +4 Tide man 2026-08-14 5/250 2026-08-18 11:35 by Tide man
[论文投稿] 投稿咨询 +4 wwm09 2026-08-17 5/250 2026-08-18 11:25 by 無關想念
[基金申请] 时间戳变了,能看出什么问题? +5 基诺咪客 2026-08-17 6/300 2026-08-18 11:06 by hunter无悔
[基金申请] 93BebMhtakh前后11位开头都是大写 +4 且听虎啸 2026-08-17 5/250 2026-08-18 00:49 by 蔡棒棒菂
[基金申请] 感觉是下周放榜了 +6 angus9576 2026-08-17 11/550 2026-08-17 23:57 by angus9576
[基金申请] filecode=后面第一个是大写字母 +8 wangze12014 2026-08-14 10/500 2026-08-17 17:05 by xter9665
[基金申请] 今天系统多次维护,明天很可能放榜! +8 zju2000 2026-08-16 9/450 2026-08-17 12:20 by lmz0216
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
信息提示
请填处理意见