[kondora]

Hello all,

Let's assume that we have a Eulerian multiphase simulation. Number of phases is n_phases. For the velocity inlet for each phase we would like to specify volume fraction, which is calculated somewhere within UDF and written to global variable. To do that, we must use DEFINE_PROFILE macro, whose arguments are: DEFINE_PROFILE(vof_profile,t,i), so: name, thread and position/index of variable being set. Let say that we would like to create only one universal function DEFINE_PROFILE, which will be hooked in B.C. panel for each phase other than 1. Here's part of my code:

some code

DEFINE_PROFILE(vof_profile,t,i)
{

    #if !RP_HOST /* SERIAL or NODE */

        int ii;

        face_t f;

        Thread *mixture_thread = THREAD_SUPER_THREAD(t);

        Thread **pt;
        pt = THREAD_SUB_THREADS(mixture_thread);

        for(ii = 1; ii < n_phases+1; ii++)
        {
            if(pt[ii] == t)
            {
                Message("\Found it!!!, DOMAIN_PHASE_INDEX is, ii = %d\n", ii);
            }
        }

        begin_f_loop(f,t)
        {
            F_PROFILE(f,t,i) = alpha[ii-1]; /* global array whose elements are calculated in other function
                                                          and having indices according to: ii = PHASE_DOMAIN_INDEX - 1 */
        }
        end_f_loop(f,t)

    #endif /* !RP_HOST */
}

Can it be easier? I mean - is there any super-hidden macro wich return pointer to the Domain or PHASE_DOMAIN_INDEX, for example:

DEFINE_PROFILE(vof_profile,t,i)
{
   Domain *domain = GET_DOMIAN_POINTER_HAVING_GIVEN_PHASE_THREAD(t);
    ...
}

Do you know any other, easier way than I posted? It should be available in FLUENT, esspecialy because people are often using DEFINE_PROFILE macro. Thanks in advance!!!