[andrk]

Hi everyone, would you like to help me to check whats wrong with my step or anything?

This is what I have done...

fluent launcher -> 2D, double presition, parallel 2 processor
time= transient
multiphase = mixture, 2 phases, slip velocity, implicit volume fraction, dispersed interface model, implicit body force
energy = on
viscous = k-epsilon (2 eq)

user defined -> function hooks adjust = 4 selected

I create new material named silica-gel, change density, cp, and thermal conductivity

Phase-1 = water-vapor
Phase-2 = silica-gel (diameter = 0.25 mm)

zone name = silicagel, porous zone (porosity 0.8),enable 1 energy source term (udf sumber_energi)

initialize from inlet

time step 1s for 100 (max 5 iterations/time step)

The geometry is like this...


And this is the UDF code...

#include "udf.h"

#define NO 71.6
#define ALPHA 3080
#define BETA 18.9
#define R 8.31429

/* PERSAMAAN ADSORPSI ISOTERMAL */
DEFINE_ADJUST(adsorpsi_isotermal,domain)
{ 
 Thread *t; 
 cell_t c; 
 real E,A,P;

  thread_loop_c(t,domain) /* loop over cell threads in domain d */
 {
   begin_c_loop(c,t)
  {
     real temp = C_T(c,t); /* temp as temperature cell field variable macro */
     P = C_P(c,t) + RP_Get_Real("operating-pressure");
     E = ALPHA + BETA * temp;
     A = R * temp * log(1.47E9/P);  /* A = RT ln (Po/P) */
     C_UDSI(c,t,0) = NO * exp(-A*A/(E*E));
  }
   end_c_loop(c,t)
 }
}

/* PERSAMAAN KAPASITAS ADSORPSI */
DEFINE_ADJUST(kapasitas_adsorpsi, domain) 
{
 Thread *t;
 cell_t c;
 real dt;
  thread_loop_c(t,domain) 
 {
   begin_c_loop(c,t) 
  {
     dt = CURRENT_TIMESTEP;
     C_UDSI(c,t,1)=C_UDSI_M1(c,t,1)+0.15*dt*(C_UDSI_M1(c,t,0)-C_UDSI_M1(c,t,1));
  }
    end_c_loop(c,t)
 }
}

/* PERSAMAAN KONSERVASI MASSA */
DEFINE_ADJUST(konservasi_massa, domain) 
{
 Thread*t; cell_t c;
 thread_loop_c(t,domain) 
 {
      begin_c_loop(c,t) 
  {
         C_UDSI(c,t,2)=-0.532224*0.15*(C_UDSI(c,t,0)-C_UDSI(c,t,1)); 
  }
      end_c_loop(c,t) 
 }
}

/* PERSAMAAN KONSERVASI MASSA SEBELUMNYA DIJADIKAN SOURCE TERM */
DEFINE_SOURCE(src_massa,c,t,dS,eqn) 
{
 dS[eqn]=0.0;
 return C_UDSI_M1(c,t,2);
}

/* PERSAMAAN PANAS ADSORPSI */
DEFINE_ADJUST(panas_adsorpsi,domain) 
{
 Thread*t;
 cell_t c;
 real p_operating, p_static;
 thread_loop_c(t,domain) 
  {
    begin_c_loop(c,t) 
   {
     C_UDSI(c,t,3)=ALPHA*sqrt(log(NO/C_UDSI_M1(c,t,0))); 
   }
    end_c_loop(c,t)  
  }
}

/* PERSAMAAN ENERGI */
DEFINE_SOURCE(sumber_energi,c,t,dS,eqn) 
{
 real sumber_energi;
 sumber_energi = -C_UDSI_M1(c,t,2)*0.496056352e3*ALPHA*sqrt(log(NO/C_UDSI_M1(c,t,0)));
 dS[eqn] = 0.0;
 return sumber_energi;
}

Thee error message is The fl process could not be started.


Hope you notice the error, thank you so much