[denis.sanga@hotmail.it]

Goodmorning, I need to save the residuals in a .txt file and I found online the following code:

#include "udf.h"DEFINE_ADJUST(my_adjust,domain)
{
int nw;
real scaled_res;
FILE *fp;
fp = fopen("output_test","a");
fprintf(fp,"\n");
fprintf(fp, "current iter = %d\n",count2[nres-1]);
for (nw=0; nw<MAX_EQNS; ++nw)
{
if (strlen(DOMAIN_EQN_LABEL(domain,nw))>0)
{
scaled_res = DOMAIN_RES(domain,nw)[nres-1]/
DOMAIN_RES_SCALE(domain,nw)[nres-1];
fprintf(fp,"%s equation: %g\n",DOMAIN_EQN_LABEL(domain,nw),scaled_res);
}
}
fclose(fp);
}

and I would like the following output:
"current iter = 1
continuity equation: 1
x-velocity equation: 1.01033e-08
y-velocity equation: 1.01114e-08
z-velocity equation: 0.000495387
energy equation: 5.91456e-08
k equation: 0.77859
epsilon equation: 0.7963"


But an error occur about the DOMAIN_RES(domain,nw)[nres-1] and DOMAIN_RES_SCALE(domain,nw)[nres-1] variables : "subscripted value is neither array nor pointer".

can someone help me to solve the problem?
thank you very much
best regards
DS