• 大小: 5KB
    文件类型: .rar
    金币: 2
    下载: 2 次
    发布日期: 2021-06-09
  • 语言: 其他
  • 标签: fluent  udf  激光焊接  

资源简介

用于激光焊接 熔覆 等fluent仿真 有初始化文件 材料物性定义 激光移动热源 传导系数等等 文件 udf\initialization_1.c udf\initialization_2.c udf\source.c udf\source_heat.c udf\ti64_spec_T.c udf\udf_density_temp.c udf\udf_heatconductivity_temp1.c udf\viscosity-temp2.c udf

资源截图

代码片段和文件信息

#include“udf.h“
#include“stdio.h“
#include“math.h“
#include“sg_mphase.h“
DEFINE_INIT(my_init_functionmixture_domain)
{
int phase_domain_index;
cell_t cell;
Thread *cell_thread;
Domain *subdomain;
real xc[ND_ND];
sub_domain_loop(subdomainmixture_domainphase_domain_index)
{
if(DOMAIN_ID(subdomain)==2)
thread_loop_c(cell_threadsubdomain)
{
begin_c_loop_all(cellcell_thread)
{
C_CENTROID(xccellcell_thread);
if(sqrt(ND_SUM(pow(xc[0]-(-4.40019E-05)2.)pow(xc[1]-(-0.000082591)2.)pow(xc[2]-(0.00001748)2.)))<=1.79424E-05||
sqrt(ND_SUM(pow(xc[0]-(-7.52125E-05)2.)pow(xc[1]-(-5.02644E-05)2.)pow(xc[2]-(0.000022226)2.)))<=2.48963E-05||
sqrt(ND_SUM(pow(xc[0]-(-6.56051E-05)2.)pow(xc[1]-(-8.33105E-05)2.)pow(xc[2]-(0.000045564)2.)))<=1.76922E-05||
sqrt(ND_SUM(pow(xc[0]-(1.91471E-05)2.)pow(xc[1]-(-0.000078)2.)pow(xc[2]-(0.000019848)2.)))<=2.25503E-05||
sqrt(ND_SUM(pow(xc[0]-(-1.77492E-05)2.)pow(xc[1]-(-0.000051579)2.)pow(xc[2]-(0.000019987)2.)))<=2.32921E-05||
sqrt(ND_SUM(pow(xc[0]-(1.52132E-05)2.)pow(xc[1]-(-4.39809E-05)2.)pow(xc[2]-(0.00000999)2.)))<=9.98955E-06||
sqrt(ND_SUM(pow(xc[0]-(-2.69723E-05)2.)pow(xc[1]-(-8.11411E-05)2.)pow(xc[2]-(0.000050044)2.)))<=1.93697E-05||
sqrt(ND_SUM(pow(xc[0]-(-2.60066E-05)2.)pow(xc[1]-(-4.00606E-05)2.)pow(xc[2]-(0.000060362)2.)))<=2.35877E-05||
sqrt(ND_SUM(pow(xc[0]-(1.90756E-05)2.)pow(xc[1]-(-3.45264E-05)2.)pow(xc[2]-(0.000040986)2.)))<=1.63591E-05||
sqrt(ND_SUM(pow(xc[0]-(1.14245E-05)2.)pow(xc[1]-(-6.71629E-05)2.)pow(xc[2]-(0.000059872)2.)))<=2.31881E-05||
sqrt(ND_SUM(pow(xc[0]-(-7.53037E-05)2.)pow(xc[1]-(-2.35309E-05)2.)pow(xc[2]-(5.438E-06)2.)))<=5.4376E-06||
sqrt(ND_SUM(pow(xc[0]-(-9.28067E-05)2.)pow(xc[1]-(-0.000027794)2.)pow(xc[2]-(7.028E-06)2.)))<=7.02805E-06||
sqrt(ND_SUM(pow(xc[0]-(-0.000082423)2.)pow(xc[1]-(8.25916E-06)2.)pow(xc[2]-(0.000017326)2.)))<=1.81669E-05||
sqrt(ND_SUM(pow(xc[0]-(-4.79777E-05)2.)pow(xc[1]-(2.89916E-05)2.)pow(xc[2]-(0.000020397)2.)))<=2.06396E-05||
sqrt(ND_SUM(pow(xc[0]-(-5.56304E-05)2.)pow(xc[1]-(-1.12744E-05)2.)pow(xc[2]-(0.000040873)2.)))<=2.38733E-05||
sqrt(ND_SUM(pow(xc[0]-(-0.000079657)2.)pow(xc[1]-(1.72425E-05)2.)pow(xc[2]-(0.000061306)2.)))<=2.11109E-05||
sqrt(ND_SUM(pow(xc[0]-(-3.04049E-05)2.)pow(xc[1]-(-1.62388E-05)2.)pow(xc[2]-(0.000013702)2.)))<=1.58697E-05||
sqrt(ND_SUM(pow(xc[0]-(1.93526E-05)2.)pow(xc[1]-(-0.000015499)2.)pow(xc[2]-(0.000015515)2.)))<=1.69875E-05||
sqrt(ND_SUM(pow(xc[0]-(-2.00863E-05)2.)pow(xc[1]-(1.21033E-05)2.)pow(xc[2]-(0.000012732)2.)))<=1.30976E-05||
sqrt(ND_SUM(pow(xc[0]-(2.36273E-06)2.)pow(xc[1]-(2.58184E-05)2.)pow(xc[2]-(0.000012582)2.)))<=1.25821E-05||
sqrt(ND_SUM(pow(xc[0]-(-7.65435E-06)2.)pow(xc[1]-(-5.49222E-06)2.)pow(xc[2]-(0.000039262)2.)))<=2.15947E-05||
sqrt(ND_SUM(pow(xc[0]-(0.000028043)2.)pow(xc[1]-(3.49778E-06)2.)pow(xc[2]-(0.000060319)2.)))<=2.12894E-05||
sqrt(ND_SUM(pow(xc[0]-(-8.00037E-05)

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       7583  2017-12-12 12:11  udf\initialization_1.c

     文件       7462  2017-12-12 11:26  udf\initialization_2.c

     文件       1982  2017-12-11 21:55  udf\source.c

     文件        578  2017-12-08 16:38  udf\source_heat.c

     文件        195  2017-11-28 09:46  udf\ti64_spec_T.c

     文件        256  2017-11-28 09:45  udf\udf_density_temp.c

     文件        273  2017-11-28 16:17  udf\udf_heatconductivity_temp1.c

     文件        246  2017-12-07 11:59  udf\viscosity-temp2.c

     目录          0  2017-12-12 11:52  udf

----------- ---------  ---------- -----  ----

                18575                    9


评论

共有 条评论