fluent　udf源文件 fluent　udf 初始化，材料物性定义 ，金属熔池模拟(fluent　udf　fluent　ud...

#include"udf.h" #include"stdio.h" #include"math.h" #include"sg_mphase.h" DEFINE_INIT(my_init_function,mixture_domain) { int phase_domain_index; cell_t cell; Thread *cell_thread; Domain *subdomain; real xc[ND_ND]; sub_domain_loop(subdomain,mixture_domain,phase_domain_index) { if(DOMAIN_ID(subdomain)==2) thread_loop_c(cell_thread,subdomain) { begin_c_loop_all(cell,cell_thread) { C_CENTROID(xc,cell,cell_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),2.),pow(xc[1]-(-5.52253E-05),2.),pow(xc[2]-(0.000063137),2.)))<=1.9451E-05|| sqrt(ND_SUM(pow(xc[0]-(7.92249E-05),2.),pow(xc[1]-(-7.90915E-05),2.),pow(xc[2]-(0.000021168),2.)))<=2.13497E-05|| sqrt(ND_SUM(pow(xc[0]-(5.08171E-05),2.),pow(xc[1]-(-4.79376E-05),2.),pow(xc[2]-(0.000020359),2.)))<=2.10295E-05|| sqrt(ND_SUM(pow(xc[0]-(5.03371E-05),2.),pow(xc[1]-(-8.00947E-05),2.),pow(xc[2]-(0.000049475),2.)))<=1.99912E-05|| sqrt(ND_SUM(pow(xc[0]-(8.77427E-05),2.),pow(xc[1]-(-8.77427E-05),2.),pow(xc[2]-(0.000052505),2.)))<=1.22573E-05|| sqrt(ND_SUM(pow(xc[0]-(4.57218E-05),2.),pow(xc[1]-(-3.45341E-05),2.),pow(xc[2]-(0.000062243),2.)))<=1.89698E-05|| sqrt(ND_SUM(pow(xc[0]-(0.000079858),2.),pow(xc[1]-(-4.81761E-05),2.),pow(xc[2]-(0.000049694),2.)))<=2.10929E-05|| sqrt(ND_SUM(pow(xc[0]-(4.72878E-05),2.),pow(xc[1]-(-1.03416E-05),2.),pow(xc[2]-(6.088E-06),2.)))<=7.74925E-06|| sqrt(ND_SUM(pow(xc[0]-(8.34438E-05),2.),pow(xc[1]-(-2.64222E-05),2.),pow(xc[2]-(0.000016511),2.)))<=1.72032E-05|| sqrt(ND_SUM(pow(xc[0]-(6.02603E-05),2.),pow(xc[1]-(2.82443E-05),2.),pow(xc[2]-(7.865E-06),2.)))<=8.30475E-06|| sqrt(ND_SUM(pow(xc[0]-(8.89122E-05),2.),pow(xc[1]-(1.31725E-05),2.),pow(xc[2]-(0.000011414),2.)))<=1.19565E-05|| sqrt(ND_SUM(pow(xc[0]-(8.14098E-05),2.),pow(xc[1]-(-1.09313E-05),2.),pow(xc[2]-(0.000062564),2.)))<=1.86438E-05|| sqrt(ND_SUM(pow(xc[0]-(5.99937E-05),2.),pow(xc[1]-(4.2288E-06),2.),pow(xc[2]-(0.000029871),2.)))<=2.47587E-05|| sqrt(ND_SUM(pow(xc[0]-(-8.72407E-05),2.),pow(xc[1]-(6.18615E-05),2.),pow(xc[2]-(0.000012247),2.)))<=1.36346E-05|| sqrt(ND_SUM(pow(xc[0]-(-6.27148E-05),2.),pow(xc[1]-(6.76797E-05),2.),pow(xc[2]-(0.000013005),2.)))<=1.30932E-05|| sqrt(ND_SUM(pow(xc[0]-(-8.26494E-05),2.),pow(xc[1]-(8.73585E-05),2.),pow(xc[2]-(0.000012652),2.)))<=1.32253E-05|| sqrt(ND_SUM(pow(xc[0]-(-5.85727E-05),2.),pow(xc[1]-(9.01627E-05),2.),pow(xc[2]-(9.837E-06),2.)))<=9.8368E-06|| sqrt(ND_SUM(pow(xc[0]-(-8.19931E-05),2.),pow(xc[1]-(4.16537E-05),2.),pow(xc[2]-(0.000033275),2.)))<=1.80576E-05|| sqrt(ND_SUM(pow(xc[0]-(-9.06268E-05),2.),pow(xc[1]-(5.51571E-05),2.),pow(xc[2]-(0.000055536),2.)))<=9.3733E-06|| sqrt(ND_SUM(pow(xc[0]-(-4.92279E-05),2.),pow(xc[1]-(4.54048E-05),2.),pow(xc[2]-(0.000058179),2.)))<=2.07941E-05|| sqrt(ND_SUM(pow(xc[0]-(-8.11275E-05),2.),pow(xc[1]-(8.04564E-05),2.),pow(xc[2]-(0.00004561),2.)))<=1.94161E-05|| sqrt(ND_SUM(pow(xc[0]-(-4.24563E-05),2.),pow(xc[1]-(7.98665E-05),2.),pow(xc[2]-(0.000035797),2.)))<=2.11625E-05|| sqrt(ND_SUM(pow(xc[0]-(-1.52239E-05),2.),pow(xc[1]-(5.72828E-05),2.),pow(xc[2]-(0.000018393),2.)))<=1.96556E-05|| sqrt(ND_SUM(pow(xc[0]-(3.37409E-05),2.),pow(xc[1]-(3.57358E-05),2.),pow(xc[2]-(0.000018183),2.)))<=1.91768E-05|| sqrt(ND_SUM(pow(xc[0]-(-1.29478E-05),2.),pow(xc[1]-(8.81286E-05),2.),pow(xc[2]-(0.000011832),2.)))<=1.18324E-05|| sqrt(ND_SUM(pow(xc[0]-(9.8094E-06),2.),pow(xc[1]-(8.90928E-05),2.),pow(xc[2]-(0.00001072),2.)))<=1.07203E-05|| sqrt(ND_SUM(pow(xc[0]-(-4.45086E-06),2.),pow(xc[1]-(0.000036079),2.),pow(xc[2]-(0.000056422),2.)))<=2.51542E-05|| sqrt(ND_SUM(pow(xc[0]-(1.42032E-05),2.),pow(xc[1]-(5.73605E-05),2.),pow(xc[2]-(0.000032089),2.)))<=1.37615E-05|| sqrt(ND_SUM(pow(xc[0]-(-1.29585E-05),2.),pow(xc[1]-(7.96905E-05),2.),pow(xc[2]-(0.000061565),2.)))<=1.99149E-05|| sqrt(ND_SUM(pow(xc[0]-(1.72187E-05),2.),pow(xc[1]-(0.000084393),2.),pow(xc[2]-(0.000042651),2.)))<=1.62215E-05|| sqrt(ND_SUM(pow(xc[0]-(-5.73738E-05),2.),pow(xc[1]-(8.87152E-05),2.),pow(xc[2]-(0.000063219),2.)))<=1.12848E-05|| sqrt(ND_SUM(pow(xc[0]-(5.73718E-05),2.),pow(xc[1]-(4.97044E-05),2.),pow(xc[2]-(9.423E-06),2.)))<=9.8968E-06|| sqrt(ND_SUM(pow(xc[0]-(0.000080607),2.),pow(xc[1]-(3.76438E-05),2.),pow(xc[2]-(0.000014227),2.)))<=1.45049E-05|| sqrt(ND_SUM(pow(xc[0]-(3.71833E-05),2.),pow(xc[1]-(9.31248E-05),2.),pow(xc[2]-(7.161E-06),2.)))<=7.68995E-06|| sqrt(ND_SUM(pow(xc[0]-(3.52502E-05),2.),pow(xc[1]-(7.14727E-05),2.),pow(xc[2]-(0.000016721),2.)))<=1.72235E-05|| sqrt(ND_SUM(pow(xc[0]-(7.57066E-05),2.),pow(xc[1]-(7.54394E-05),2.),pow(xc[2]-(0.00002261),2.)))<=2.48664E-05|| sqrt(ND_SUM(pow(xc[0]-(5.37873E-05),2.),pow(xc[1]-(4.58133E-05),2.),pow(xc[2]-(0.000055607),2.)))<=2.47463E-05|| sqrt(ND_SUM(pow(xc[0]-(8.07308E-05),2.),pow(xc[1]-(8.06198E-05),2.),pow(xc[2]-(0.000063158),2.)))<=1.96126E-05|| sqrt(ND_SUM(pow(xc[0]-(0.0001),2.),pow(xc[1]-(0.0001),2.),pow(xc[2]-(0.0001),2.)))<=0.000001||xc[2]<=0) { C_VOF(cell,cell_thread)=1.; C_T(cell,cell_thread)=353; } else { C_VOF(cell,cell_thread)=0.; C_T(cell,cell_thread)=300; } } end_c_loop_all(cell,cell_thread) } } }