


{"id":368817,"date":"2024-05-28T04:38:45","date_gmt":"2024-05-28T04:38:45","guid":{"rendered":"\/forum\/?post_type=topic&#038;p=368817"},"modified":"2024-05-28T04:38:45","modified_gmt":"2024-05-28T04:38:45","slug":"heat-flux-estimation-for-a-lox-lch4-rocket-engine-using-udf","status":"closed","type":"topic","link":"https:\/\/innovationspace.ansys.com\/forum\/forums\/topic\/heat-flux-estimation-for-a-lox-lch4-rocket-engine-using-udf\/","title":{"rendered":"Heat flux estimation for a LOX LCH4 rocket engine using UDF"},"content":{"rendered":"<p>I&#8217;m working on the design of a pressure-fed LO2 and LNG rocket engine. I&#8217;ve been using Fluent to estimate the heat flux for an ablative-cooled engine. I was able to solve all the compilation errors for my UDF.<\/p>\n<p>I&#8217;m attaching my boundary conditions and mesh. My model is axisymmetric and I have a fluid-solid domain in my problem, so all my methods are second order. But I keep getting this error whenever I run my calculations.<\/p>\n<p>&#8220;Divergence detected in AMG solver. temporarily reducing Courant number to 0.5 and trying again&#8230;&#8221;<\/p>\n<p>Is there a problem with my mesh? I&#8217;ve used a multi-zone and face mesh with 15 inflation layers.<br \/>I&#8217;ve tried all the methods I know to simplify the problem, my mesh quality is fairly good. I still keep getting the same error<\/p>\n<p><img decoding=\"async\" src=\"\/forum\/wp-content\/uploads\/sites\/2\/2024\/05\/28-05-2024-1716870312-BC_Fluent.png\" alt=\"\"><\/p>\n<p><img decoding=\"async\" src=\"\/forum\/wp-content\/uploads\/sites\/2\/2024\/05\/28-05-2024-1716870607-Mesh.png\" alt=\"\"><\/p>\n<p>(The actual mesh is much more refined, the picture quality is quite poor)<\/p>\n<p><img decoding=\"async\" src=\"\/forum\/wp-content\/uploads\/sites\/2\/2024\/05\/28-05-2024-1716870667-Inflation layer.png\" alt=\"\"><\/p>\n<p>I&#8217;m attaching my UDF below:<\/p>\n<div><span style=\"font-size: 10pt\">#include &#8220;udf.h&#8221;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">#define pi 3.14159<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">DEFINE_PROFILE(Boun_cond,t,i)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">real x[ND_ND];<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">real rt, dt, At, vis, Cp, Pr, Pc, Tc, gamma, Cstar,Cstareff, g, r, A, M, Mnew, N1, N2, N3, Taw, Thotgas,T,hgas,func, ffunc, fCO2, fH2O, Le, qrad, qCO2, qH2O, P, mdot,kt;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">face_t f;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">int k,NI;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">rt=0.015085; \/* m&nbsp; &nbsp; &nbsp; &nbsp; *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">vis=0.000075018; \/*Kg\/m-s&nbsp; &nbsp; *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Cp=2328.6; \/*J\/Kg-K&nbsp; &nbsp; *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Pr=0.6552;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Pc=2500000; \/*Pa *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Tc=3235; \/*K *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">gamma=1.20;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Cstar=1855.4; \/*m\/s *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Cstareff = 0.92;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">kt = 0.2662; \/*W\/mK *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">NI=1000;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">dt=rt*2;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">At=pi*pow(rt,2);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">fCO2=0.10511; \/*Mole fraction of CO2 *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">fH2O=0.46300; \/*Mole fraction of H2O *\/<\/span><\/div>\n<div><span style=\"font-size: 10pt\">mdot = 0.987; \/*Mass flow rate of exhaust *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">begin_f_loop(f,t)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">F_CENTROID(x,f,t);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">r=sqrt(pow(x[0],2)+pow(x[1],2));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">A=pi*pow(r,2);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Le=0.6*2*r;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*For combustion chamber *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">if (x[0]&lt;0.06604)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">M=0;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">P=Pc\/pow((1+(gamma-1)*pow(M,2)\/2),(gamma\/(gamma-1)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">T=Tc\/(1+(gamma-1)\/2*pow(M,2));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Taw=Tc*((1+pow(Pr,0.33)*((gamma-1)\/2)*pow(M,2))\/(1+((gamma-1)\/2)*pow(M,2)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Thotgas=T+0.9*(Tc*pow(Cstareff,2)-T);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">hgas=0.01975*pow(k,0.18)*pow((mdot*Cp),0.82)\/pow((2*r),1.82)*pow((Thotgas\/(F_T(f,t))),0.35);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*Radiation heat transfer&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qCO2 = 5.74*pow((P*fCO2*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">qH2O = 4*pow((P*fH2O*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qrad=qCO2+qH2O;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*For subsonic region&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;*\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">if (x[0]&lt;0 &amp;&amp; x[0]&gt;=0.06604)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">for (k=1;k&lt;=NI;k++)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div><span style=\"font-size: 10pt\">if (k==1)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">M=0.05;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">else<\/span><\/div>\n<div><span style=\"font-size: 10pt\">M=Mnew;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">N1=2\/(gamma+1);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">N2=(gamma+1)\/(2*(gamma-1));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">N3=1+(gamma-1)*pow(M,2)\/2;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">func = pow(N1, N2) * pow(N3, N2) \/ M &#8211; A \/ At;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">ffunc=-pow(N1,N2)*pow(N3,N2)*pow(M,-2)+pow(N1,N2)*N2*pow(N3,N2-1)*(gamma-1);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">Mnew=M-func\/ffunc;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">if(fabs(Mnew-M)&lt;0.01)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">break;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">P=Pc\/pow((1+(gamma-1)*pow(M,2)\/2),(gamma\/(gamma-1)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">T=Tc\/(1+(gamma-1)\/2*pow(M,2));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Taw=Tc*((1+pow(Pr,0.33)*((gamma-1)\/2)*pow(M,2))\/(1+((gamma-1)\/2)*pow(M,2)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Thotgas=T+0.9*(Tc*pow(Cstareff,2)-T);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">hgas=0.01975*pow(k,0.18)*pow((mdot*Cp),0.82)\/pow((2*r),1.82)*pow((Thotgas\/(F_T(f,t))),0.35);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*Radiation heat transfer&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qCO2 = 5.74*pow((P*fCO2*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">qH2O = 4*pow((P*fH2O*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qrad=qCO2+qH2O;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*For Supersonic region*\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">if (x[0]&gt;=0)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">for (k=1;k&lt;=NI;k++)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">{<\/span><\/div>\n<div><span style=\"font-size: 10pt\">if (k==1)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">M=5;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">else<\/span><\/div>\n<div><span style=\"font-size: 10pt\">M=Mnew;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">N1=2\/(gamma+1);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">N2=(gamma+1)\/(2*(gamma-1));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">N3=1+(gamma-1)*pow(M,2)\/2;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">func = pow(N1, N2) * pow(N3, N2) \/ M &#8211; A \/ At;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">ffunc=-pow(N1,N2)*pow(N3,N2)*pow(M,-2)+pow(N1,N2)*N2*pow(N3,N2-1)*(gamma-1);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">Mnew=M-func\/ffunc;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">if(fabs(Mnew-M)&lt;0.01)<\/span><\/div>\n<div><span style=\"font-size: 10pt\">break;<\/span><\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">P=Pc\/pow((1+(gamma-1)*pow(M,2)\/2),(gamma\/(gamma-1)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">T=Tc\/(1+(gamma-1)\/2*pow(M,2));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Taw=Tc*((1+pow(Pr,0.33)*((gamma-1)\/2)*pow(M,2))\/(1+((gamma-1)\/2)*pow(M,2)));<\/span><\/div>\n<div><span style=\"font-size: 10pt\">Thotgas=T+0.9*(Tc*pow(Cstareff,2)-T);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">hgas=0.01975*pow(k,0.18)*pow((mdot*Cp),0.82)\/pow((2*r),1.82)*pow((Thotgas\/(F_T(f,t))),0.35);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">\/*Radiation heat transfer&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; *\/<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qCO2 = 5.74*pow((P*fCO2*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">qH2O = 4*pow((P*fH2O*r\/(pow(10,5))),0.3)*pow((F_T(f,t)\/100),3.5);<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">qrad=qCO2+qH2O;<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">F_PROFILE(f,t,i)=(hgas*(Taw-F_T(f,t))+qrad);<\/span><\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">end_f_loop(f,t)<\/span><\/div>\n<div>&nbsp;<\/div>\n<div><span style=\"font-size: 10pt\">}<\/span><\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n<div>&nbsp;<\/div>\n","protected":false},"template":"","class_list":["post-368817","topic","type-topic","status-closed","hentry"],"aioseo_notices":[],"acf":[],"custom_fields":[{"0":{"_bbp_author_ip":["23.216.133.155"],"_bbp_subscription":["349801"],"_btv_view_count":["343"],"_bbp_topic_status":["unanswered"],"_bbp_topic_id":["368817"],"_bbp_forum_id":["27792"],"_bbp_engagement":["199","349801"],"_bbp_voice_count":["2"],"_bbp_reply_count":["1"],"_bbp_last_reply_id":["370147"],"_bbp_last_active_id":["370147"],"_bbp_last_active_time":["2024-07-02 14:30:22"]},"test":"vijay-adhi2021vitstudent-ac-in"}],"_links":{"self":[{"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/topics\/368817","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/topics"}],"about":[{"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/types\/topic"}],"version-history":[{"count":1,"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/topics\/368817\/revisions"}],"predecessor-version":[{"id":368818,"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/topics\/368817\/revisions\/368818"}],"wp:attachment":[{"href":"https:\/\/innovationspace.ansys.com\/forum\/wp-json\/wp\/v2\/media?parent=368817"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}