[arunraj]

I have compiled the following UDF in parallel mode of v20.1 student version and receive the following error.


Creating user_nt.udf file for 2ddp_node ...
(system "copy "C:\PROGRA~1\ANSYSI~1\ANSYSS~1\v201\fluent"\fluent 20.1.0\src\udf\makefile_nt.udf "libudfM\win64\2ddp_node\makefile" ")
1 file(s) copied.
(chdir "libudfM")(chdir "win64\2ddp_node")# Generating ud_io1.h
mass.c
..\..\src\mass.c(26): error C2109: subscript requires array or pointer type
..\..\src\mass.c(27): error C2109: subscript requires array or pointer type
..\..\src\mass.c(27): error C2198: 'sqrt': too few arguments for call


#include "udf.h"
#include "math.h"

#define M 18.015
#define hfg 2600000.0
#define R 8314.0
#define pi 3.141592
#define pref 101325
#define Tref 373.15
#define pv 15828.0
#define Tv 343.0

DEFINE_SOURCE(mass,c,t,dS,eqn)
{
real source, pv_eq, Tlv, vol, Acell ;
Thread *t_int;
face_t f_int;
real area;
Domain *domain;
domain = Get_Domain(1);
t_int = Lookup_Thread(domain,3); /*3 is the zone id for the boundary where source term is to be applied*/
begin_c_loop(c,t)
{
int i = 0;
f_int = C_FACE(c,t,i);
F_AREA(area,f_int,t_int);
Acell = NV_MAG(area);
Tlv = C_T(c,t);
vol = C_VOLUME(c,t);
pv_eq = pref * exp(((M*hfg)/R) * ((1/Tref)-(1/Tlv)));
source = - 0.857142857 * (Acell/vol) * SQRT(2*M/pi*R) * (pv_eq/SQRT(Tlv) - pv/SQRT(Tv));
dS[eqn] = 0.0;
}
end_c_loop(c,t)
return source;
}

[vinerm]

DEFINE_SOURCE is executed on each cell of the cell zone it is hooked to. So, do not loop over the cells again. And C_FACE is available only within a c_face_loop. I suppose you intended to use that one instead of begin_c_loop.