[HRSD]

hi dears;
i use a udf code for calculate area on a boundary condition(in below), calculate area in serial run is ok but on parallel run is not ok,
please help me.
thanks.

begin_f_loop(f,t)
if PRINCIPAL_FACE_P(f,t)
{
inst_tabs = F_T(f,t);
F_AREA(face_area,f,t);
inst_area = 2 * pi * NV_MAG(face_area);
inst_rdot = aprexp * exp((-acte) / (ugc * inst_tabs));
inst_mdot = frho * (inst_area) * inst_rdot;
F_PROFILE(f,t,i) = inst_mdot;
sum_inst_tabs += inst_tabs;
area_total += inst_area;
/*C_UDMI(c,t,0) = inst_rdot;*/
}
end_f_loop(f,t)